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Vi esa cara tan triste? <LQu6 pasa? 

ES QUE QUIERO HACER TANTAS COSAS CON Ml ATARI, PERO NO SE POR DONDE 
EMPEZAR, SE QUE SE PUEDEN HACER TODAS LAS COSAS QUE YO QUIERO iPERO 
NOSECOMO! 

iCalma! Recuerda que si quieres ser un experto con tu Atari debes ser muy 
oraanlzado. 

•w' 

Veamos, i.qu6 te gustaria hacer? 

BUENO. ME OUST ARIA HACER MIS PROPIOS PROGRAMAS, Y USAR LOS JUEGOS Y 
PROGRAM AS EDUCATIVOS. ME GUSTARIA HACER HARTOS GRAF I COS Y PODER 
DEJAR 6RABAD0 TODO LO QUE HA6A. 

Bien, Poco a poco jremos revlsando todas las cosas que quieres aprender y 
muchas otras que cuando las conozcas te encantarSn. Es Importante que 
tengas claro que este no es un manual de operacion, sino una guia en todos los 
aspectos que te interesan y no aparecen en los manuales del equipo. 

AH! MUCHO MAS ENTRETENIDO ENTONCES. 

Ojal^ asl sea, PrImero me interesa conocer cual es el nivel de tus 
conoclmjentos asl es que me gustaria que conversaramos un poco. 

iME VAS A HACER UNA PRUEBA? 

Algo asl. Me gustaria saber que es para tl un computador. 

BUENO, UN COMPUTADOR ES .... ES UNA HERRAMIENTA A LA QUE YO LE PIDO QUE 
HAGA ALGUNAS COSAS Y SIEMPRE LAS HACE BIEN. 

Tlenes razdn. El computador es una herramlenta, una m^qulna que tiene 
memoria y puede realizar operaciones arltmeticas y logicas. Para poder hacer 
todo esto neceslta varlas partes o componentes i-sabes cuales son?. 

IHUMMI CREO QUE SI. AQUI TENGO Ml ATARI Y TE VOY A IR ENUMERANDO SUS 
PARTES: 
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- TENGO UN TECLADO QUE USD PARA ESCRIBIR. 

Asl es. El teclado se conoce como "Unldad de Entrada" y sirve para Ingresar 
1nformac16n al computador. - ...?-■ ,.-. <r - . . 

- TENGO TAMBIEN UNA PANTALLA EN LA CUAL VEO TODO LO QUE HACE Ml 

ATARI, r:^^^. Vv :::•;.:■-;■ :.-.^ J C--ViUl H-; ■■■ . - • ._ X ^. :rr^..iHV, 

La pantalla o monitor es la "Unldad de Sal Ida" mas usada en los 
microcomputadores y puede ser un televisor corrlente, 

- Y UNA IMPRESORA. ES BIEN CHIQUITITA PERO ES RAPIDA. 



il i' 



na,. 



La Impresora, Igual que la pantalla, se utlliza como unldad de sallda. La 
diferencia es que con la Impresora obtlenes lo que se conoce como "copia 
dura" del trabajo en camblo en la pantalla tlenes una "copla blanda". - , ,.- 

- LO ULTIMO QUE TENGO ES UNA DISKETTERA, AL PRINCIPIO TENIA UNA 
CASSETTERA PERO EN LOS CASSETTES NO ME CAB I A MUCHO Y SE DEMORABA 
DEMASIADO, 

Las cassetteras y disketteras son los medlos 1e almacenamiento auxiliar mas 
utllizados en los microcomputadores. Y hablando de memorla, creo que se te 
olvlda un componente, 

PEROSILOSDIJETODOS, ' - '^ : 'fce./tirV 

^Seguro? Fijate en el teclado. 

AH DE VERAS. UN SEfJOR DE ATARI ME LO EXPLICO, EN LA MISMA CAJA DONDE 
ESTA EL TECLADO VIENE LO MAS IMPORT ANTE DEL EQUIPO: EL PROCESADOR Y LA 
MEMORI A PRINCIPAL. 

As) es. La memorla del computador slrve para almacenar datos. . .,. . ' , ^ /^'^ 

SI, ME ACUERDO QUE EXISTEN DOS TIPOS DE MEMORIA PRINCIPAL: 

- LA RAM QUE SE UTILIZA COMO MEMORIA DE TRABAJO PARA IR DEJANDO LOS 
PROGRAMAS QUE HAGO. 

- LA ROM TRAE GRABADOS LOS PROGRAMAS BASICOS DE OPERACION QUE 
PROPORCIONA EL FABRICANTE DEL EQUIPO. 

Me alegra saber que conoces bjen el equlpo, asi podremos comenzar 
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rapldamente a utillzarlo. 

iQUE RICO! PORQUE LA VERDAD ES QUE ABURRE UN POCO TODA LA PARTE 
TEORICA, 

De acuerdo, pero tienes que tener en cuenta que es Indispensable conocerlo. En 
la medlda que domlnes los aspectos te6ricos podrds hacer un mejor uso de tu 
equlpo. 

TU DIJISTE QUE ESTE NO ES UN MANUAL DE OPERACION. ENTONCES 6QUE VAMOS 
AESTUDIAR?, 

Lo mejor es que revisemos nuestro indlce punto por punto. Primero veremos 
algunas t^cnlcas de program ac) on, 

iTECNICAS DE PROGRAMACION? AH! APUESTO QUE SE TRATA DE ALGUNOS 
TRUCOS PARA PROGRAMAR EN Ml ATARI. 

Algo asl. Para esto se supone que tu sabes BASIC. 

BUENO, NO SOY EXPERTO PERO TENGO EL MANUAL Y CUANDO TENGO DUDAS 
RECURRO A EL. 



Me parece muy bien, esa es la idea. Por eso en el capttulo de Tecnicas de 
Programacion veremos algunas instrucclones de BASIC avanzadas, que solo 
tienen los equipos mSs modernos y por supuesto, muchos ejemplos que te se 
rvir^n de guia para hacer tus propjos programas. 

SI,MEINTERESA. 6Y DESPUES? 

El Segundo capltulo lo dedicamos excluslvamente a las variables del Atari 
BASIC. 

AH! SEGUIMOS CON BASIC. MENOS MAL QUE ESTE NO ES UN MANUAL DE 
BASIC 

Es verdad, no es un manual de BASIC. Lo que pasa es que, como ya debes saber, 
el BASIC es el lenguaje mSs utillzado en los microcomputadores y viene con 
tu equlpo. Adem^s es impreslonante la varledad de apllcaciones que tiene. 

SI, A Ml ME ENCANTA. UN AMIGO ME DIJO QUE CONOCIENDO BIEN UN LENGUAJE ES 
MUCHO MAS FACIL APRENDER OTROS, 
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Correcto, porque todos, o casi todos, tienen las mismas bases, 

Y asj llegamos al tercer capltulo que tambien tiene relacion con BASIC. Esta 
vez se trata del uso de los Peeks y Pokes en e! Atari. 

ILOS FAMOSOS PEEKS Y POKES! POR FIN PODRE SABER DE QUE SE TRATAN, 

Ojala sea asi. El cuarto capltulo es un poco mas tecnico, se trata del uso de la 
diskettera y cassettera en el Atari. 

t PODRE CONOCER BIEN LAS VENTAJAS DE ESOS MED I OS DE ALMACENAMIENTO? 

Y m^s que eso: podras sacarle el maximo provecho. Lo mismo al Joystick, del 
que hablamos en el capltulo quinto. 

IME MUERO DE 6ANAS DE EMPEZAR LUEGO! IMAGINATE CON TOD AS EST AS COSAS 
NUEVAS LOS PROGRAMAS QUE VOY A PODER HACER. 

Y para darte aun mas ayuda, en la ultima parte de este libro encontrar^s un 
Anexo con algunos conceptos basicos de utilizaclon del Atari. Asi puedes 
recordar aspectos de tu Atari que se te han olvidado, o aprenderlos si no los 
conoces. 

iPANTASTICO! iEMPEZAMOS? - >< 

Una Ciltlma cosa. Me interesa saber si conoces bien tu Atari. L]o encendemos? 

lYA! lENCENDI Ml EQUIPOI MIRA LO QUE APARECE EN LA PANTALLA 
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Cuando ves la palabra READY en la pantalla, signlfica que el computador est^ 

Ijsto para que loutlllces. 

El cuadrado verde es el cursor. A medida que tCi ingresas las jnstrucciones, el 

cursor se mueve dentro de la pantalla y te indlca donde aparecer^ la proxima 

letra que escribas. 

IT ANT AS TECLASi ES VERDAO QUE EL TECLADO ES MUY PARECIDO AL DE UNA 

MAQUINA DE ESCRIBIR, PERO HAY OTRAS TECLAS DIFERENTES. 

AS) es. Dentro de las tec las diferentes, existen dos que son muy Importantes: 
RETURN y RESET, 

6Y QUE SIGNIFICAN ESAS TECLAS? - 

La tecla RETURN marca el final de un Ingreso de Informacion a trav^s del 
teclado. Ya la veremos en detalle mas adelante, 

^Y EN BASIC ES DIFERENTE, VERDAD?. 

Si, ahi marca el final de una linea que puede sen 

- incorporada al programa que estas creando (si tiene numero de linea). 

- interpretada y tuego ejecutada, si estas trabajando en modo directo (sin 
numero de linea). 

SI, SI ME ACUERDO DE ESA PARTE, AY LA TECLA RESET?. 

La presion de la tecla RESET deja al computador en su condici6n Inicial 
normal, con la pantalla limpia y modo texto, 

TODO CLARO. AEMPEZAMOS?. 

Empecemos 
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Como mencionamos en la lntroclucci6n, comenzaremos viendo algunas Tecnicas 
de Programacion en BASIC. 

YA, PERO RECUERDA QUE YA TEN60 UN MANUAL DE BASIC, ESQ SI, NO ES MUY 
COMPLETO. A VECES QUIERO HACER ALGUNAS COS AS Y NO ENCUENTRO COMO. 

De eso trata este capitulo, BASIC es un lenguaje con un conjunto pequeno de 
instrucclones y una sintaxis muy simple, Entonces ahora trataremos de 
abordar diferentes problemas con estas herramientas 

DEBE SER MUY DIFICIL HACER UN LENGUAJE DE PROGRAMACION, 6A QUIEN SE LE 
OCURRIO EL BASIC?, 

El lenguaje BASIC fue creado por John Kemenny y Thomas Kurtz en 1965 
inlcialmente orientado a aplicaciones numericas. 

i,SOLO APLICACIONES NUMERICAS? PERO YO PENSE 

Lo que pasa es que se ha difundido y mejorado de tai forma que hoy permite 
resoiver diversas aplicaciones, transformandose en uno de los lenguajes mas 
usados en mini y microcomputadores, por su facilidad de uso, aprendizaje y 
versat.il idad en el manejo, 

AL60 HE ESCUCHADO DE DISTINTOS BASIC, YO PENSABA QUE HABt A UNO SOLO. 

E! BASIC ha ido evolucionando y han ido apareclendo distintas versiones, 
primero para computadores grandes y actualmente para los 
microcomputadores. La mas popular de estas versiones para 
minicomputadores es la familia de BASIC de la Digital Equipment Corporation 
(DEC). 

6C0M0 FAMILIA? SI EST AMOS HABLANDO DE UN LENGUAJE, NO DE PER50NAS, 

Es una forma de expresarse. Existen muchas versiones de BASIC, con 
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distjntos orlgenes. Las versiones mSs importantes de la familia DEC son: 
BASIC - 1 1, BASIC - PLUS y BASIC - PLUS 2. 

6Y POR QUE SON MAS IMPORTANTES? SUPONGO QUE TENDRAN AL6UNAS 
VENTAJAS FRENTE AOTRAS VERSIONES . 

Estas versiones de BASIC poseen instrucclones especlales que no tienen otras, 

BUENO, PERO SUPONGO QUE HABRA INSTRUCCIONES COMUNES A TOD AS LAS 
VERSIONES. 

Claro que si. Las Instrucclones m^s comunes son: 

- PRINT que despljega Informacibn en la pantalia o en otro disposltlvo de 
sal Ida. 

GOTO lYO SE! GOTO PERMITE SALIRSE DE LA SECUENCIA NORMAL DE UN 
PROGRAMA E IR A LA INSTRUCCION SENALADA A CONTINUACION DE LA 
INSTRUCCION GOTO. 

Me olvldaba que sabes BASIC isabes entonces para qu^ sirven las 
Instrucclones END, LET, LIST, RUN, REM, etc.? 

SI. LAS USO MUCHO EN Ml ATARI. . -\ 

Pues muy blen, Aparte de estas instrucclones comunes hay otras especlales, 

6C0M0 CUALES?. 

Por ejempio, est^n las que se conocen como "funciones especlales de 
manipulacion de strings". 

iY QUE SON LOS STRINGS? 

Un string es un conjunto de letras o caracteres alfanumericos (letras, 
numeros y signos combinados) tratados como una unidad, 

DAME UN EJEMPLO, POR FAVOR, 

Tu nombre es un string, o sino se consideraria cada letra por separado, como 
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caracteres independientes. Esta es la manera como el computador ve los 
textos. 

AH! YA ENTIENDO 6Y CUALES SON E5AS FUNCIONES ESPECIALES DE 
MANIPULACION DE STRINGS? 

MID$, LEFTS y RIGHTS y la posibilidad de crear "arreglos de Strings". 

HE ESCUCHADO UN PAR DE VECES LA PALABRA ARREGLO, PERO NUNCA 
RELACIONADA CON STRINGS, 

Un arreglo es un conjunto cualqulera de elementos, en este caso de Strings. 
Puedo tener, por ejemplo, un arreglo con e! nombre de los meses del ano, los 
dias de la semana, colores, etc, 

ES I6UAL A LOS ARREGLOS DE NUMEROS, PERO SABES UNA COS A, AHORA QUE 
RECUERDO, YO HE TRABAJADO CON MICROSOFT BASIC Y TE PERMITE HACER 
COSAS ESPECIALES CON LOS STRINGS. 

Es que Microsoft BASIC es uno de los descendientes de esta familia. Otros 
productores, como Data General, usan una sintaxis diferente para manejar 
substrings. 

6Y COMO ES? 

Asl; A$ (X,Y) ellmina el trabajo innecesario que debe hacerse con (MID$). 
Atari BASIC es de este tipo. 

PERO ES MAS CONOCIDA LA FUNCION MID$ AUNQUE ES MAS COMPLICADA. 

Por esOj es tan importante tener slempre presente que una sintaxis simple no 
slgniflca necesariamente menos poder. En efecto, una sintaxis BASIC mSs 
simple, puede significar que el int&rprete BASIC usa menos recursos de 
Hardware. 

SI, ES INTERESANTE TU TEORIA. 

lie gustarja aprender algunos trucos de programaclon? 

iCLAROQUESI! 
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Una caracterlstica especial del Atari, es la capacldad que tiene de dlrecOonar 
Strings muy largos, 

^Y QUE PUEDO HACER CON STRINGS LARGOS? 

Bueno, qul^n te dice que no puedes construir un Procesador de Textos o un 
Editor, en BASIC, cuando tienes el poder para controlar y manipular un gran 
numero de palabras. 

PERO DEBE SER MUY LARGO Y DIFICIL, 

Uno puede inicializar un gran string de una longltud dlficll de manejar, sin 
ocupar instrucciones largas y complicadas. 

tOOO E$ = " "iTRAP 1010;F0R J= 1 TO 15 : £$ (LEN(£$)+ n=E$ 
1010 NEXT J 

VEAMOS ^QUEOTRASCOSASPODRIAHACER? 

Para apllcaciones de Bases de Datos, un administrador generalizado 
de "formatos de pantalla", podria construir y almacenar formatos de pantalla 
de entrada como grandes "imagenes tipo string", Uno podria incluir 
informacl6n especif ica en una imagen tipo string con una sola instrucci6n, 

1200 REC$ (J + 1 - LEN (EX$), J) = EXt 

6Y QUE HACE ESA INSTRUCCION? 

Lo que hace es colocar el extreme derecho de EX$ en la posicion J-esima de 
REC$, ajustando a la derecha la inforinacl6n en REC$. 

HAGAMOSLO PARA AJUSTAR A LA IZQUIERDA. 

Para eso habria que colocar el extremo izqulerdo de EX$ en la posicl6n J de 
REC$. 

1300 RECt ( J, J - 1 + LEN (EX J)) = EXt 

SABES. SIEMPRE HE TENIDO UNA DUDA CON LOS PROCESADORES DE TEXTO, NO 
SE COMO HACEN PARA ALINEAR A AMBOS LADOS UN TEXTO. 
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^h! MuysenclUo. Simplemente, agregan blancos entre las palabras, 

6Y COMO SABEN CUANTOS BLANCOS? 

Porque uno sabe cuantas letras caben en una linea. Revlsa las siguientes 
lineasdel programa; 

1400 LN = LEN(£X$) 

1410 IF LN<25 THENEX${LN+ 1)-BLANK$ (1.25 -LN) 

6Y QUE HACEN EST AS LINE AS? 

Muestran como se "agranda" EX$ agregandole blancos al final hasta que su 
longltud sea 25. Per supuesto, la primera vez EX$ debe tener menos de 25 
posjciones y BLANKS debe inicializarse como un string de blancos, 

PERO NO ME RESULTA PARA STRINGS MAS LARGOS QUE 25. 

Gambia el 25 por una variable del tamano que desees y las mismas lineas en 
una subrutina te serviran para strings de cualquier largo. 

SUPONGO QUE DESPUES PODRE SACAR LOS BLANCOS QUE SOBRAN EN EL STRING. 

Pruebaestas lineas. 

1500 LN-LEN(EXl) 

1510 IF LN>1 AND EX$(LNJ.N)»- " THEN EX»- EX$ ( 1 .LN- 1 ) 

1520 SOTO 1500 

lUN LOOP! Y A5I SACO TODOS LOS BLANCOS QUE SOBRAN, 

Y puedes hacer lo mismo con los blancos a la izquierda de un string. 

1600 IF EX* (1.1)= - " THEN EX| = EXt ( 2,LENCEX*)) : IF LEN (EX$) > = 2 THEN 1600 

Y SI SUSTITUYO EL BLANCO (" ") POR UNA VARIABLE QUE CONTENGA UN 
BLANCO, ESQ HACE MAS RAPIDA LA EJECUCION DEL PROGRAMA. 

IQu^ bien que te guste optimizar tus programas! Es muy importante que lo 
hagas asi, aunque se trate de programas pequenos. 
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ESO ES LO QUE ME GUST A DE LA PROGRAMACION: UNO PUEDE CREAR SUS 
PROPIOS PROGRAMAS Y LUEGO MODIFICARLOS PARA QUE NOS SATISFAGAN 
CIENTO POR CIENTO. 

Asl es. A medjda que vamos append jendo, nos damos cuenta de la )nf jnidad de 
cosas que se pueden hacer con el Atari. 

Y tambl^n es Importante tr aprendlendo nuevas tecnlcas, no tan solo para 
desarrollar programas mas eficientes, sino que tambien para sacar mas 
provecho del equipo. 

AVER, cone SERI A ESO. 

Mira. Revjsa el programa que aparece en las p^glnas sigulentes y verSs que es 
muy util para ingresar una pantalla completa de texto. El computador ubicara 
autom^tlcamente esta pantalla en un arreglo. 

AH! TE REFIERES A LO QUE SE CONOCE COMO EDICION DE PANTALLA. 

Asi es. La Edicidn de Pantalla, es un medio muy convenlente para el ingreso de 
datos y texto en archivos computaclonales. 

EN REALIDAD ES MUY ABURRIDO INGRESAR DATOS EN UN ATARI. HAY QUE 
DISENAR LA PANTALLA Y LUEGO INGRESAR UN REGISTRO A LA VEZ, 

Existen varlas soluclones para este problema y una de las mejores se presenta 
para el Atari 800XL. 

6ENSERI0? iY DE QUE SE TRATA? 

La clave es 1a capacidad de controlar la pantalla y "verter" su contenldo 
rapldamente con la tecnica del "teclado dinamtco". 

6TECLAD0 DINAMICO? NO LO HABIA ESCUCHADO NUNCA, 

El slguiente programa es un slstema que demuestra este princlplo. 

6ES MUY COMPLICADA LA RUTINA? 

No, es muy simple. Se establecen primero, los margenes de la pantalla. 
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haciendo una pantalla mas chica. En este ejemplo, las dimensiones de la 
pantalla son 16 lineas verticales y 35 hortzontales. La columna de numeros 
que aparece a la izqulerda de la pantalla, se supone que esta fuera de la 
pantalla. 

Y DESPUES DE PONER LOS MARGENES 6QUE PASA? 

Se toma los caracteres del teclado y se muestran en la pantalla, luego la 
rutlna verif lea si se sobrepaso el borde de la pantalla, haciendo un PEEK en las 
localizaciones84y 85. 

6QUE PASA CON LOS RETORNOS DE CARRO (RETURN)? 

No tienen otro efecto que imprimir el caracter que !o representa. 

L\ com VUELVO AL PRINCIPIO? 

En el programa Editor de Pantalla, CONTROL J se usa como una serial. El 
programa pide una conf irmaclon y si se escribe una "S", se pasa a la rutina del 
"teclado di nam! CO", 

6QUE PASA CON ESA RUTINA? 

En la rutlna del teclado din^mico, el cursor se ubica o coloca (POSITION) y se 
pide una entrada (INPUT) desde e! editor, y el teclado dinamico se activa y 
desactiva a medida que se reconocen las 16 lineas. 

iYA! QUIERO VER EL PROGRAMA 

Estd bien. Aqui lo tienes, Cisalo; 

REM SAVE "DfOfTOR" 

10 REM "EDITOR DE PANTALLA" 

100 DIM B*(600), A*(40) 

1I0?C1«$(125) 

120 60SUB500 

130 OPEN *1,4,0,"K:" 

1 40 l^fi ****'»*********'*'*****♦***»****»*•***»**»*»*****'*********>* 

150 POSITION 3,0;? :60SUB 1000 
160 6ET*1J 

165 IF T«tO THEN 230:R£M lO-CTRL-J" 
170 IF T-20 THEN 150:REri 20-CTRLT- 
180 IF PEEK(85)-36 THEN 60SUB 1000 
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190 IF PEEK(85)>38 THEN POKE 85,38:60SUe 1000:6010 160 
200 JF PEEK(84)>16 0RPEEK(84) <1 THEN 150 
210 IF T-156 0RT-157 0RT-125 THEN 160 
220 ? CHR$(T);:60T0 160 
230 POSITION 3,18 

235 ? **ESTA SE6UR0?";:6ET »t,X 

236 POSITION 3,18 

237 ? " 

240 IF XoASaV) THEN 150 

250 REM «*««**«««*««****«*««*«^«*««*«i*«««««« «*««««««««««««««« 

260 FOR 1-1 TO 16 

262 POSITION 3,1 

264 POKE 842,13 

266 INPUT At 

270 POKE 842 J 2 

280 B$(I*35-34J*35)-A$ 

290 NEXT I 

300 REM *««««««•«*<**«««««««««*««««««*«*«*««*««*««««*«*«♦«*«««* 

310 STOP 

315?CHR$(125) 

320 FOR 1-1 TO 16 

330 ? B$(l*35-34 .1*35) 

340 NEXT I 

350 60SUB 500 

355 GOTO 150 

360 STOP 

500B${1K " 

510B$(600K 

520 B$(2)«B$ 

600 POKE 82,0 

602 POSITION 0,0:? 

604 FOR 1-1 TO 16:?I;NEXT1 

606 POKE 82,4 

610 POSITION 3,0 

620 ? -USE CTRL J PARA ACEPTAR" :RETURN 

1000 FOR 1-1 TO 5 

1010 SOUND 0,50,10,10 

1020 NEXT! 

1030 SOUND 0.0,0.0:RETURN 

iTANTOS POKES! 

No son tantos, S61o los que aparecen entre las lineas 260 y 270. Sirven para 
leer desde la pantalla a la variable llamada A$. Ya aprenderemos mas 
adelante como usar blen las instrucciones PEEK y POKE. 

EN REAL I DAD EST A ES UNA RUTINA, SUP0N60 QUE DEBE FORMAR PARTE DE 
ALGUN PROGRAMA. 

Asi es. Generalmente, A$ se escribe a un archivo en disco. En este proqrama 
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de ejempio, simplemente )o coplo a otro string (B$), 

L\ PARA QUE LA INSTRUCCION STOP? 

Este programa de demostracion se detiene cuando se transfiere el contenido 
desde A$ a B$, Si se usa CONT se replte el ciclo completo. 

ME SORPRENDE BAST ANTE QUE SE PUEOA HACER ALGO ASI CON UN LENGUAJE 
COMO BASIC, 

Para que no menosprecles el BASIC. Si lo usas bien puedes lograr cosas mas 
sorprendentes todavia, Aunque limltado en algunas formas, generalmente es 
mSs "amistoso" de lo que se piensa, 

AHORA ME GUST ARIA DIBUJAR. 

(LDlbuJar?, Si, puede ser, LHas usado las Instrucciones PLOT y DRAWTO? 

MAS MEMOS. PEROME ENCANTARIA APRENDER A USARLAS BIEN. 

Si alguna vez haz tratado de graficar alguna figura complicada, e incluso 
alguna figura simple, sabras que consume mucho tiempo. 

IMELO DICES AMI! : ^ .:■ H 

Bueno, pues Ipor que no hacer que el computador lo haga por ti? 

6T0D0 EL TRABAJO? 

El programa que te voy a ensenar, te permlte hacer el dibujo en la pantalla 
usando el joystick, y luego el computador lo graf ica bien con las instrucciones 
PLOT y DRAWTO, 

iFANTASTICO! i-QUE TENGO QUE HACER? 

Escribe cuidadosamente el programa, sin tratar de acortarlo para que no te 
equivoques. 

NO TE PREOCUPES, SIEMPRE SIGO TUS INSTRUCCIONES AL PIE DE LA LETRA. 
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Los sigulentes pasos, te muestran como hacer un cuadrado con una equis (x), 
en su Interior. A primera vista, te parecerS un poco confuso, pero a medida 
que vayas aprendiendo, te saidr^ mucl^o mas f^cil. 
I.- Escoge el modo grafico que quieras. Te sugiero el modo grafico 3 para 

empezar. 
2.- Escoge el color del cursor, 

3,- Escoge la luminosidad del cursor (con 7 obtendras una buena sombra) 
4- Escoge el color del fondo, 
5.- tiueve al cursor a un punto inlclal y dibuja un lado del cuadrado 

(preslona el boton del joystick para dibujar). 
6.- Ubica el cursor en una de las esquinas (esquina I), y luego presiona "P" 

(est^s PLOTTING (dibujando) tu primera linea), 
7.- Muevete a la segunda esquina, no importa el camino que sigas y 

presiona la "D". Acabas de hacer que el computador dibuje (DRAWTO) 

para tl. 
8.- Para la segunda linea permanece en la esquina No 2 y presiona "P", 

Muevete a la tercera esquina y presiona "D". 
9.- Slgue el mismo procedimiento liasta volver a la esquina N^ i. 
10.- Cuando termines tu cuarta linea, comienza una nueva (presionando 

"P"). Muevete a la esquina diagonal y termina la linea. 
1 1 .- Haz lo mismo con las otras dos esquinas. 
12.- Presiona la tecla ESCAPE, 
13.- Veras que ingresan algunas Instrucciones al programa y luego estaras 

en modo grafico, 
1 4- Deberas tener tu cuadrado con una X en el interior. 

Las llneas 700 - 898 han sido reservadas para tus instrucciones PLOT - 
DRAWTO. Puedes listarlas todas las veces que quieras, pero no las ejecutes 
para volver al dibujo. En vez de eso escribe "G.4000". 
Te dar^s cuenta que el cursor se mueve lentamente en modo grafico 8, Si 
puedes dibujar mas rapldo, presiona la "F". Cuando quieras dibujar mas 
lento, deberas disminulr la velocidad del cursor, presionando la "S". 
Si quieres comenzar una nueva figura o dibujar debes sacar las lineas 
700-898. Asegurate que la linea 700 sea: 

700 RETW^N 
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Aqgi tiene s e] Prog r ama -. 



REM SAVE "DiDIBUJA" 

1 REM *PR06RAMA QUE DIBUJA*^ 

2 REM *** > * 

3 DIM AN$(l);Li«699:GRAPHiCS 0:SETCaOR 2,0,0;? :? :? "hOOO GRAFICO (3 AL 8r;:lNPUT 
MODO;tF M0DO8THEN 5. 

A ? ;? XaOR DEL CURSOR (0 A l4r;;tNPUT CC:? ;? lUMlNOSIDAD DEL CURSOR (0 A 
l4r;;INPUT CL 

5 ? ;? TONDO DE CaOR (St NOr;:INPUT ANMF ANj^-N" THEN 7 

6 ? ;? XaOR DEL FONDO (0 A Hr;:INPUT BC:? ;? lUMINOSiDAD DEL FONDO (0 A M]":;INPUT 
BL 

7 IF M000=8 THEN HRN6=5I9;VRN6=!59 

8 IF M0D0=6 (^ hODO=7 THEN HRN6H59:VRN6-79 

9 IF MOOO-4 OR MODO-5 THEN HRNG-79:VRN6=39 
11 !F hODO»3 TH£NHRNG=38;VRN6=19 

14 GRAPHICS MODO'.SETCOLC^ 23C,BL:SETC0L(P 0,CCA:SETCOL(^ 4,BC.BL:CaOR 1:P0KE 

752J;L=500:60SUB 700 
17 ? "HORIZONTAL -";? VERTICAL - " 
20 GOSUB 100;IF STRIG(0>0 THEN PLOT H,V:GOTO 20 
30 PLOT H,V;FOR X-l TO 5:NEXT X;P(^ITION H,V:? ♦S;" ":GOTO 20 
100 S-STtCK(0);IF S=l I THEN H=H-1 
105 iFS-5 THEN H-H+ 1 ;V-V+ 1 
no 1FS-7THENH-H+) 
115 tFS-6 TH£NH-H+I:V=V-1 
120 1FS'14THENV»V-1 
125 !FS-15THENV-V+t 
130 tFS-9 THENH-H-1:V«V+1 
135 tFS-10 THEN H-H- 1:V-V-1 
140 IFH<OTHENH-0 
142 IF H>HRNG THEN H«HRNG 
144 tFV>VRNGTHENV-VRN6 
150 !FV<0THENV=0 

155 IF MM=0 THEN POKE 656,0:P0KE 657 J 8:? '•MEM,DISP,.;FRE(0):Mn=l 
160 IF PEEK(764)=56 THEN GOSUB 2000:P0K£ 656.2:? "RAPtDEZCDlBUJA MAS LENTO) 

•":FT-]:GOSUB 440 
165 IF PEEK(764HJ2 OR OK-K) THEN GOSUB 2000:P0KE 656,2:? "* * * DIBUJANDO 

FACILMENTE***'':FT-0:60SUB 440:0K«1 
170 IFFT-l THENRETUf^ 
180 IF PEEK(764>10 THEN 60SUB 2000:P0KE 656J;P0KE 657,15;? **6RAF.'';H;",";Vr ":G0SUB 

L;G0SUB 440 
1 85 IF PEEK(764)-28 THEN 1010 
190 IF PEEK(764)«58 THEN GOSUB 2000:P0KE 656J:P0KE 657,27:? "DIB/;H;"/;V; " ".GOSUB 

L:GOSUB 440 
210 POKE 656,0:P0KE 657,13;? H;" " 
230 POKE 657,11:? V;- " 
300 RETURN 

440 POKE 764,255:RETURN 
500 L-503:A-H;B-V:RETURN 
503 L-510;C«H;D-V:RETURN 
510 L=513:£-H:F«V:RETURN 
513 L-520:G-H;I-V:RETURN 
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520 L-523:J-H:K-V:RETURN 

523 L»530:M-H:N=V:RETURN 

530 L-533:0-H:P-V:RETURN 

533 L=540:Q-H:R-V:RETURN 

540 L=543:SS-H:T»V:RETURN 

543 L«550:U-H:W«V:RETURN * ' 

550 L-553:Y«H:Z«V:RETURN 

553 L-560:AA-H;Ad-V:RETURN 

560 L=563:AC-H:A0=V;RETURN 

563 L«570:AE-H:AF=V;RETURN '- ' 

570 L=573:A6=H:AH=V:RETURN '- 

573 L-580:AI»H: AJ-V:RETURN 

580 L-583:AK=H:AL-V:RETURN 

583 L=590;AM-H;AN=V:RETURN - . .. -^ v^: 

590 L-593:AOH:AP-V:RETURN - 

593 L«600;AQ-H:AR=V:RETURN 

600 L-603:AS-H:AT-V:RETURN '- • ;- '" 

603 L-650;AU«H:AV«V:RETURN 

650 GOTOIOtO '■ 

700 RETURN 

899 RETURN : "- ' 

950 IF DD=0 AND EE=0 AND FF=0 AND 66=0 THEN RETURN ^ t>- 

951 LKI+I 

952 ? Lir PLOT ^•DD^;;EE;":DRAWTO ";FFr/;66:RETURN 
1010 GRAPHICS 

1012 ? :? :? ' ' ^' 

1015 DD-A;£E-B:FF<:66=D:60SUB 950:DD=£:EE=F:FF«6:G6-I:60SUB 950:DD-J: 

EE-K:FF-I1:66=N:60SUB 950 

1020 DD»0:EE'P:FF-Q:66=R:60SUB 950:DD=SS;EE=T:FF«U:66-W:60SU& 950: 

DD-X;EE=Z:FF=AA:66-AB:60SUB 950 

1050 DD-AC;EE-AD:FF=AE:66«AF:60SUB 950;DD=A6:EE=AH;FF=A1:66-AJ: 60SUB ' ^"' 

950:DD«AK:EE-AL:FF-AM:66=AN:60SUB 950 

1040 DD-A0:EE«AP:FF«AQ:66«AR:60SUB 950:DD=AS:EE=AT;FF=AU:66=AV; 60SUB 950:? -60T0 

4000" 

1100 POSITiON0,0:P0KE 842,1 3:END 

2000 SOUND 0,17,10,10 

2001 F0RX=1 T0 7:NEXTX 

2002 SOUND 0,0,0,0 

2003 RETURN 

4000 A=0:B=0:C=0:D=0:E=0:F«0;G=0:I=0:J=0:K=0:L=0;M=0;NK):0=0:P=0:Q=0:R-0 
:SS-0:T-0:VK):W-0 

4001 YK):Z=O:AA-0:AB=0:AC-0:AD=0:AEK):AF=0:AG=0;AH«0:Al=0:AJK):AK=0: 
AL«0:Ari»0:AN-0:A0K):AP»0:P0KE 842,12 

4002 AQ»0;AR=0:AS-0:AT=0:AU=0:AV«0;LKI+l:m»0:Of<>0:60TO 14 

iME ENCANTA HACER DIBUJOS Y GRAFICOS! LO QUE ME DA UN POCO DE RABiA ES 
TENERQUEHACERTANTASVECESELMISMODIBUJO, - - 

6C6mo? No te entiendo. ^, ... ^. 
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CLARO, SI TEN60 UN DIBUJO Y LO QUIERO OCUPAR EN OTROS PROGRAMAS TENGO 
QUE VOLVER A DIBUJARLO, Y PARA ESO HAY QUE USAR UN MONTON OE 
INSTRUCCIONES; POSITION, PRINT, ETC. 

Tengo un programa que creo te puede servir para eso. . 

6EN SERIO? L ES MUY COMPLICADO? 

' -j 

No, no mucho, Este programa permite hacer cualquier tipo de caracteres 
graf icos en una pantal la, con GRAPHICS 0. 

iY COMO LOS USO OESPUES? 

La pantal la, tal como queda finalmente, se graba en un diskette con nCimeros 
de Unea que puedan agregarse a un programa principal por medio de la 
instrucci6n ENTER. 
Es importante que sigas algunas Instrucciones. 

MIENTRAS NO SEAN DEMASIADAS 



No te preocupes. Despu^s de ejecutar el programa y de darle un nombre para 
grabar los resultados, no debes hacer nada para mover la pantal la, 

iQUESIGNIFICAESO? 

Que lo que dibujas tiene que sen hecho con el cursor y no debes preslonar 
nunca la tec la RETURN. 

Es recomendable que la primera cosa que hagas sea borrar el mensaje que 
aparece al Iniciar el programa. No borres la palabra CONT que aparecera en la 
Ijnea 22 de tu pantalla. Puedes usar las teclas de movlmiento del cursor y 
cualquier otra funci6n de edlcl6n del Atari. 

iLISTO? 

Cuando termines, mueve el cursor a la linea que tIene el CONT y presiona la 
tecla RETURN. 

iYQUEPASAAHl? 
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5e ejecutar^ el programa. Cuando la disketera termlne de functonar, el 
program a ha final Izado. 

TODO CLARO. ,i,VEAMOS LAS OPCIONES DEL PROGRAMA? 

Este programa tiene muchas opciones. La unica opcJ6n que no tienes es mover 
el CONT a la ultima linea. 

6P0RQUEN0? 

Porque si lo haces la pantalla se movers (SCROLL) cuando presiones la tecla 
RETURN. 

6Y PUEDO HACER VARIAS PANT ALL AS DIFERENTES? 

Per supuesto. Solo tienes que ejecutar varias veces el programa, una para 
cada pantalla. Tienes que usar una especlflcacl6n de archivo diferente y 
cambiar el valor de la linea 2020 (30000). Como se necesitan exactamente 40 
lineas para grabar una pantalla, incrementa 30000 en bloques de 50 y asi 
tendr^s lineas disponlbles para Instrucciones RETURN, 
A! poner juntos todos tus gr^flcos, simplemente haz un ENTER de todas las 
especiflcaciones de arcliivo que usaste y listalas bajo una sola nueva 
especificacion. 

^Y COMO FUNCIONA EL PROGRAMA? 

El programa simplemente construye un arreglo R$ para que sea igual a una 
linea de BASIC. Concatena un nCimero de linea (3000 + I), un comando de 
impresibn (el signo de interrogacidn) y luego agrega una comilla (con el 

CHR$(34)), 

t\ YO PUEDO PONER UNA COMILLA COMO CARACTER 6RAFIC0 EN LA PANTALLA? 

iBuena preguntal Lamentablemente la respuesta es NO, ya sabes, se puede 
confundir con la otra comilla. 

Luego, usando la 1nstrucci6n LOCATE, se examlna cada posici6n en la pantalla 
y se agrega a R$ con la instrucci6n CHR$(x). 

ME PARECE RARO QUE EN LA LINEA 2035 J COMIENCE CON UN VALOR IGUAL A 2, 
SIEMPREE5 1. 
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Si, pero recuerda que puedes Iniclallzar un contador con el valor que tu 
qui eras, 

iCIERTO! SI PUEIX) IR DISMINUYENDO ESE VALOR. " 

Bueno, la linea 2035 iniclaliza J con un 2 para que coincida con los valores 
per omJsi6n en la pantalla. 

Si tratas de usar las lineas resultantes con diferentes anchos de pantalla, 
entonces se cambia este valor para que coincida con el los. 

6Y NUNCA CIERRAS LA COMILLA? 

Claro que si. R$ se completa con un CHR$(34) terminal, una coma para evitar 
un "scrolling" (CHR$(59)) o un retorno de carro (CHR${ 1 55)) 

Mira. Aqui tienesel listadodel Programa. ' 

REM SAVE "D;ARCHIVA" 

100 GRAPHICS 

no DIM R$(80),F$(17),1$(I0) 

120 ? "IN6RESA EL NOMBRE DEL ARCHIVO"; 

130 INPUT l$:Ft-"D:":F$(LEN(F*)+1H$ 

140 GRAPHICS 

150 POSITION 4,22 

160 ?XONT ^STOP 

1900 0PEN*1,8,0,F* 

2000 J«0 >> . ■ 

2010 FOR 1-0 TO 23 

2020 R$-STRJ(30+I) 

2025 R${LEN{Rt)+l)="b?" 

2030 R$(LEN(Rt)+1KHR$(34) 

2035 F0RJ-2T0 39 

2040 LOCATE J,I,X 

2045 R$(LEN(R*)+1KHRt{X) 

2050 NEXT J 

2055 R$(LEN(R$H1KHR$(34) 

2060 R$(LEN(Rt)+lKHR$(59) 

2065 RKLENCR* H 1 KHR$( 1 55) 

2070 PRINT* I. -RJ 

2075 R$-" • 

2080 NEXT I 

2090 CLOSE *1 

2200 POSITION 0,22:? 
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^AB80/«.IBILIEa FWI ATAIBO IBASflg! 

ME DA LA IMPRESION QUE ESTE CAPITULO NO VA A SER MUY ENTRETENIDO 
iS 1 6 AMOS CON LOS 6RAFIC05 MEJOR? 

Para muchos programadores, las variables no son tan entretenidas. Pero seras 
capaz de crear programas mucho mas eflcientes si entlendes como se 
almacenan y como pueden ser manipulados, 

SUENA INTERESANTE, EXPLICAME UN POCO MAS, 

Existen tres tlpos de variables que pueden ser utillzadas por los 
programadores Atari, 

iTRES? iCUALES SON? 

Los numericos, los arreglos y los strings. 

iOUE NOMBRES TAN RAROS! BUENO, YA ME EXPLICASTE LOS STRINGS, PERO LOS 
OTROS PARECE QUE NO LOS CONOZCO. 

St, si los conoces. Las variables num^rlcas comunes, representadas con un 
nombre como X, I, TOTAL, SUMA, etc. 

AH! SON LAS VARIABLES QUE USO CON LA INSTRUCCION LET, QUE NO ES 
NECESARIOESCRIBIR. 

Exacto. El valor de una variable numerica se asigna dentro del programa, 

ASICOMO X = 7, SUMA = A*B 

y cada variable numerica ocupa 6 bytes de memoria. 

^,Y CUAL ES LA DIFERENCI A CON LOS ARREGLOS? 

Los arreglos son conjuntos de numeros representados por un nombre de 
variable seguido de un elemento numerico entre parentesis. 
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UN EJEMPLO, POR FAVOR. 

Por ejemplo, A(3), MES(7), etc. Antes de usar un arreglo, debes dimensionarlo 
con el tamano m^xjmo estjmado. 

iLA INSTRUCCION DIM!. 

Claro, Tjenes que escrlbir por ejemplo, DIM ME5( 1 2), 

6Y CUANTA MEMORIA OCUPAN LOS ARRE6L0S? 

Reservan seis bytes de memoria por cada elemento del arreglo, 

EN EL CASO DEL EJEMPLO SI TENGO 12 ELEMENTOS OCUPARIA 12*6 = 72 
BYTES IQUE HARTO! 

Por eso es muy Importante que dtmensiones muy blen tus arreglos, 

YA SOLO NOS QUEDAN LOS STRINGS. 

Los strings son variables extremadamente versatiles, de ahi su gran utilldad, 

LO QUE RECUERDO BIEN ES QUE LOS STRINGS SE REPRESENT AN CON UN NOMBRE 
DE VARIABLE SEGUIDO DE UN SIGNO PESOS (COMO A$, BLANKS). 

Otra caracterjstica Importante es que tambien deben ser dimenslonados. 

6Y PARA QUE SE DIMENSIONAN LOS STRINGS? 

Para que el computador reserve memoria para el string, Cada caracter en una 
variable tlpo string se almacena como un byte, 
(LSabes lo que es la Tabla de Nombres de Variable? 

NO TENGO LA MENOR IDEA. 

Es una llsta de todos los nombres de variable que se han Ingresado, 
almacenados en numeros de c6dlgo AT ASCI I en la misma secuencla en la cual 
f ueron encontrados dentro del programa. 

i-Y QUE MAS INDICA ESTA TABLA? 
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Cada nombre de variable Identiflca el tlpo de Variable. Las variables 
numericas se almacenan con 128 agregado al valor AT ASCI I del ultimo byte 
del nombre. 

AHI SI QUE NO TE ENTENDI NADA.' 

Por ejemplo, el nombre de la variable HIT se describe en tres bytes con los 
valores 72, 73 y 2 1 2 (2 1 2 = 84 + 1 28). 

UN POCO MEJOR. 6Y LOS ARREGLOS? 

Los arreglos se almacenan con un par^ntesis a la izquierda y tambl6n se le 
suma 128 como ultimo byte en el nombre, 

SUPONGO QUE PARA EL ULTIMO BYTE EN LOS STRINGS TAMBIEN SE LE SUMA 1 28. 

SI, y se le agrega adem^s el signo pesos. La direccion de memoria para el 
inlcio de una tabla de nombres de variable puede determinarse con PEEKS en 
las local izaciones 130 (LO) y 131 (HI) o con NTAB = PEEK (130) * 256* PEEK 
(131). 

.^VAMOS A VER ESTO CON ALGUN PROGRAM A? 

Ejecuta el programa siguiente para ver las entradas en la tabla de nombres de 
variables. 

^Y QUE HACE EL PROGRAMA ESPECIFICAMENTE? 

Imprime el valor almacenado en los primeros 24 bytes de la tabla, un byte por 
cada caracter en cada nombre de variable. Chequea los resultados con el 
listado de los AT ASCII que aparece en tu manual y no olvides que se le agrego 
128 al ultimo caracter. 

El primer nCimero impreso es 216, que es la primera variable (*) (88 en codigo 
AT ASCI I) mSs 128, ya que X es tambi^n el ultimo caracter. La linea 50 
imprime los nombres con el ultimo caracter en inverso. 
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REM SAVE "0:NOriVAR" 

1 REM PR06RAMA PARA HIPRIMIR TABLA DE 

2 REM NOMBRES OE VARIABLES 

10 X-12:Y«35:Z2-12345:D1M A(12X HITK9),SMALL$(35XB16$(612) 

20 NTAB-PEEK(130)+256«PEEK(13t ) 

30 FOR BYTEK) TO 23 

32 ? PEEK(NTAB+BYTE)rr; 

34 NEXT BYTE 

40 ? :? :? '^ • '^ 

50 FOR BYTE-0 TO 23 - 

52 ? CHR$(PEEK(NTAB+6YTE)); 

54 NEXT BYTE 

Para que te quede mas claro, escribe y ejecuta el siguiente programa. 

dYHACELOMISMO QUE EL ANTERIOR? •■ ■• •] '- 

No. Con este programa podras ver el numero de la Variable, el nombre y 8 
bytes de data para cada variable dentro del programa. 

PERO LA LINEA 10 ES IGUAL A LA DEL PROGRAMA ANTERIOR, ^ ' "'' •• ■ ' 

Si, esa linea contiene variables de ejemplo para experimentar. 

ME GUST ARIA AGREGARSELO A MIS PROGRAMAS PARA QUE ME LISTE LAS 
VARIABLES, 

Lo puedes modif (car y te sirve para tus programas. Revlsa el siguiente Itstado 

REM SAVE "DiVALVAR" 'rl^'h.. _ A ' >".. 

! REM PROGRAMA PARA IMPRfMIR LA 

2 REM TABLA DE VALORES OE VARIABLES .. ,,.^ . | . 

5 GRAPHICS 

10 X-12;Y=35:ZZ=I2345:DIM A(12),HIT(4,9),SMALL$(35),BiG$(612) "*- 

15 REM BUSCA LA DIRECCION INICIAL DEL NOMBRE DE LA TABLA :•: - 

20 NTA6-PE£K(130)+256*PEEK(13t) " _ . 

25 REM BUSCA LA DIRECCION INICIAL DEL VALOR DE LA TABLA 

27 VTAB-P££K(134H256*PEEK(135) • -^ .. 3 Oi ': "' : 

30 ?"VAR NOMVAR DATA VTAB**;? h- r.. . 

35 l-O : .._,... ._,'...'.., . ;. - . 

40 FORVARNUM-OTO 12 . r^.-- .: '- 

45 ? "***;VARNUM; " "; 

50 POSITION 9.VARNUM42 

55 FORBYTE-0TO10O 

60 VARCHR-NTAB+BYTE 

65 IF PEEK(VARCHR)> 128 THEN ? CHR$(PEEK(VARCHR)- 128),:NTAB= VARCHR+ 1 POP :GOTO 80 

70 ? CHR$(PEEK(VARCHR)); 
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75 NEXT BYTE . . .- . 

80 POSITION 17.VARNUri+2 • " 

85 F0RBYTE-0T0 7 
90 ? PEEK(VTAB+VARNUh*8+BYTE); 
95 IF BYTE <7 THEN ? V; 
100 NEXT BYTE 

105 ^' 

110 '"•+! 

Hi NEXTVARNUM 

ES BIEN ELEVADO EL NIVEL DE TODO LO QUE HEMOS VISTO. 6TE ENOJAS 51 TE 
PRE6UNT0 QUE PODEMOS HACER CON TODO ESTO? 

No, por el contrario. Una primera apllcacion es realrzar PEEKS sobre la tabla v 
determinar el estado de las disttntas Variables. 

DE VERAS, AS! PUEDO VERIFICAR QUE EL PROGRAMA E5TE HACIENDO LO QUE 
QUIER0QUEHA6A 

Como ya te dije, los strings son muy Versailles. Ya sabes que los strings son 
una serie de numeros AT ASCI I y cada numero tiene un valor entre y 255 y 
ocupa un byte en la memoria. 

SI, LO RECUERDO. UN STRING DE MIL CARACTERES OCUPA MIL BYTES 
ADYACENTES EN MEMORIA. 

Y esto suglere una apllcacion interesante. Una manera util de reservar una 
cantidad determinada de bytes de memoria, por ejemplo 1000, es dimensiooar 
el string. 

COMO A$ (1000) 

Puedes manejar tu propia tabla de valores dentro del string indexando cada 10 
100 direcciones. La direccion inicial de tu string puede encontrarse 
facilmente con la funcion ADR(A$). 

6QUE HACE ESA FUNCION? 

La tnstrucc16n 7PEEK (ADR(A$>99) te entregara el valor del centeslmo byte 
en A$. El uso de los strings de esta manera es una forma comun de almacenar 
datos enteros (menores que 256) y subrutlnas en lenguaje de maqulna, 
Ahora si que veremos algo sumamente interesante. 
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6EN SERIO? iYA ERA MORA! 6QUE E5? 

iComo que ya era hora!. A lo mejor la primera vez que leas estas cosas no te 
parecer^n demaslado interesantes, pero no te daras ni cuenta y ya estaras 
usando estas Ideas. 

MEMOS PALABRAS Y MAS ACCION. 6DE QUE SE TRATA? 

Bueno, vamos a seguir con nuestro tercer capitulo con el que entenderas 
mucho mejor los programas anterlores, ya veras. 
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B»|g|gligS y IPaiglES (Diia (tH ATABSB 



• i^ * * < 



SI eres un programador Basic que reci^n emplezas, seguramente aun no te haz 
dado cuenta de las capacidades adtclonales que tienes a) usar Basic en tu 
Atari. 

6P0R QUE? 6ACAS0 ES DIFERENTE AL BASIC DE OTROS EQUIPOS? ' ' 

Asi es y mas que eso, no es el Basic sine ei Atari, De hecho, el Atari Basic 
utlliza algunas capacidades que tiene Atari y no otros equipos.. 

6ENSERI0? ' •'' \ : - '■ • - 

Si, es en serio. Por ejemplo, puedes redef inir el conjunto de caracteres de tal 
forma, que la letra A aparezca como un marciano invasor. 

JAHI ASI SE DEBEN HACER LOS JUEGOS, 

Correcto. Si estas programando, puedes hacer que el programador tenga el 
completo control sobre la pantalla de graficos. Y como estas, muchas otras 
caracteristicas adicionales de tu Atari. 

PERO A LO MEJOR NO PUEDO USAR TOD AS ESTAS COS AS ESPECIALES CON 
BASIC. 

Es posible usar la gran mayoria en Basic. Algunas requieren que se trabaje en 
lenguaje de maquina. 

...Y UN PRINCIPIANTE COMO YO NO TIENE IDEA DE UTILIZARLAS. 

Sin embargo, para utilizarlas directamente, solo necesitas dos palabras 
especiales en Basic. PEEK y POKE. 

6PEEK y POKE? 6QUE SIGNIFICAN? 
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Ya lo descubrlr^s, Primero vamos a hacer un pequeno repaso. 

Veamos; iSabes cual es el procesador de tu Atari? n,,.,,, j 

j 
BUENO. EL PROCESADOR, ES EL CEREBRO DE Ml ATARL j 

Correcto, y el modelo del procesador es el 6502. iY cuantos kilobytes puede I 
direcclonar? j 

6DIRECCI0NAR? . j 

1 

51, cuantos kilobytes puede mane jar, Es decir, en que lugares puede guardar \ 
inf ormacion y de cuales otros, puede sacar Inf ormaclon, j 

iAH! SUPONGO QUE 64 Kb, POR LO MENOS EL MANUAL DICE QUE EL EQUIPO TIENE i 
64KbDEMEM0RIARAM. ; 

Cast, cast. Puede direccionar directamente 65.536 ubicaciones de memoria en i 
RAM y, ademas tiene otra memorla en ROM, 

6Y PARA QUE DIRECCIONA LA RAM? 

Para poder grabar alii los datos y programas, 

6Y LA ROM? 

Como en la ROM se guarda el Basic y el sistema operativo, necesito poder 

accesarlos y para eso, tengo que direccionaria, 

Ademas, hay una tercera clase de memoria. , . 

INO PUEDE SERI LOS COMPUT ADORES SOLO TIENEN MEMORIA RAM Y ROM, 

Tienes razon. En realidad, no es memoria propiamente tal, Se trata de chips, 
utilizados para las operaciones de Entrada y Salida. 

MEJOR ME EXPLICAS MAS CLARAMENTE, PORQUE NO ENTIENDO NADA. 

Empecemos de cero, iSabes que es un chip? 
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SI.S0NL0SCIRCUIT05INTE6RAD0S, ' ■■ -^ '- 

Ya, (tY una operacion de Entrada y Sallda? -■ • 

SI, SE REFIERE A GRABAR RECUPERAR INFORMACION, DESDE HACIA EL 
COMPUTADOR. 

Bueno, resulta que tu Atari, tiene algunos chips de entrada y salida con 
nombres bien especiales, Ellosson; 

- 6TIA , un chip graf Ico 

- ANTIC, un chip que direcciona el C7TIA para producir modos graf icos 

- POKEY, un chip que lee el teclado y maneja las operaciones de entrada y 
salida, usadas para comunicarse con disketteras e impresoras. 

^Y COMO FUNCIONAN ESTOS CHI PS? 

Estos chips necesitan informacl6n, como por ejempio, que caracteres poner en 
la pantalla y, pueden producir informacion, por eJempIo: saber que tecia se 
esta presionando. 

Para hacer las cosas m^s simples, tu manejas estos chips como 
local izaclones de memoria. 

AH! POR ESO DIJISTE QUE ERA UN TlPO DE MEMORIA, 

Correcto. Al principio se definen distintas direcciones, en las cuales se les 
puede informar algo a estos chips. 

COMO CARTAS EN EL CORREO. 

Asi es. En este caso, lo haces con las Instrucciones PEEK y POKE. 

POKE, sirve para modificar la accidn de un chip y PEEK, entrega informaci6n 

desdeel chip, 

Desde un punto de vista computacional, 6stas son locallzaclones de memoria. 

En efecto, algunas se comportan como la RAM. 

6DE QUE FORMA? ^ 

Por ejempio, puedes colocar (POKE) un nCimero en una local izaci6n, y luego 
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leer (PEEK) la localtzaclon para obtener el numero de vuelta. 

SEA, QUE YO GUARDO UN NUMERO EN CUALQUIER LOCALIZACION DE MEMORIA Y 
LUEGO, DOY LA LOCALIZACION Y ME APARECE EL NUMERO. 

La mayoria de las direcclones de Entrada/Salida, son solo de lectura o solo de 

escritura, La ROM, es solo de lectura. 

Las locallzacjones de memoria solo de escritura, pueden ser cambladas. 

lAH! TANTAS COSAS. 

Asj es tu Atari, muy completo. Te lo explico: si tu escribes (POKE) en una 
direccion, sucede una cosa; mientras que si lees (PEEK), sucede otra. 

A VER, RESUMAMOS, POKE SE USA PARA.,,, PARA,., 

POKE, se usa para cambiar el contenido de la memoria. El formato es; 

POKE direccion, dato 

6CUALES PUEDEN SER LAS DIRECCIONES? 

La direccion es un numero entre y 65535, Cada numero accesa una celda de 
memoria, que puede contener un nCimero entre y 255. 

LAS CELDAS EN LA MEMORIA, SON COMO LAS CASILLAS DEL CORREO. iVERDAD? 

51, as! se representan esquem^ticamente. Mas tecnicamente, se puede pensar 
en una celda de memoria como un grupo de 8 interruptores. 

ilNTERRUPTORES? 

IClaro! un interrupter puede tomar 2 valores. 

lENCENDIDO Y APAGADOl 

Correcto. Y si decimos "encendido=r' y "apagado=0", cada interruptor puede 
tener s61o dos valores: y 1. 
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AH/ h£ ACORDE! EST AS HABLANDO DE LOS NUMEROS BINAR/OS. . ^ : ; 

Muy bjen. Entonces, tenemos este grupo de 8 Interruptores con dos estados 
cada uno, y con los cuales se puede representar distintos nOmeros, 
iCu^l es el en binario? : 

BUENO, ES I6UAL QUE EN LOS NUMEROS NUESTROS; : - . 

Es decir, todos los Interruptores deben estar en 0, 6Y el 255? 

SUPONGO QUE SERAN OCHO UNOS, 

Asles. 1 1 1 1 1 I 1 1 = 255 

ME DISTE EL FORMATO DEL POKE, PERO DEL POBRE PEEK NUNCA MAS SE SUPO. 

PEEK es el inverso de POKE, pero es mas una funclon que una Instrucclon, 

6P0R QUE? 

Porque PEEK entrega como resultado un valor, y cualquier instruccion que use 
un valor, puede usar un PEEK. 

POR EJEMPLO... :^ 

Veamos la instruccJ6n PRINT. TO puedes decir PRINT 4, 1o que te muestra un 
4 PRINT TOTAL, te muestra el contenido de la variable TOTAL y PRINT PEEK 
(53076), te muestra el valor almacenado en la local izaci6n 53076. 

ENTONCES YO POOR I A USAR UN PEEK DENTRO DE UN POKE, 

Correcto. Esta bien si escribes POKE 106, PEEK (30865). 

CUANDO MENCIONASTE LA INSTRUCCION PEEK, DIJISTE ALGO DE QUE SE PODIA 
REDEFINIR EL CONJUNTO DE CARACTERES DE Ml ATARI. 

Asj es. Veamos U6mo lees un caracter desde el teclado, usando BASIC? 

CON LA INSTRUCCION GET 
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Correcto, Pero que espera GET. 

NO ENTIENDO TU PREGUNTA. .^ 

Que tienes que hacer, para que el computador sepa la tecla que presionaste, 

NO SE, BUENO, YO PRESIONO UNA TECLA Y EL RESTO LO HACE EL COMPUTADOR. 

Eso es el computador espera que presiones una tecla, Si no presionas ninguna, 
el programa se detendra hasta que presiones alguna. 

iESVERDAD! NOME HABIADADO CUENTA 

En vez de usar GET, puedes chequear la local izacion 764 con PEEK (754). 

iPOR QUE LA 764? 

Porque en esa localizacldn, el computador guarda la tecla que presionaste. 

6Y QUE PASA SI NO PRESIONO NADA? 

Si PEEK (764) = 255, significa que no se ha preslonado ninguna tecla. Si el 
valor que te entrega es diferente a 255, puedes usar la instruccion GET para 
saber que tecla fue presionada, 

YAME PARECE MAS UTIL LA INSTRUCION PEEK. 

A ver, iy qu6 tienes que hacer antes de usar la instruccion GET? 

AL PRINCIPIO DEL PROGRAMA, DEBO ABRIR UN ARCHIVO QUE DIRECCIONE EL 
TECLADO, LO HAGO CON LA INSTRUCCION OPEN. 

Bueno, si to s61o quleres esperar que una tecla sea presionada, puedes usar 
algo como; - - 

10 PRINT "PRESIONE CUALQUIER TECLA PARA CONTINUAR 
20 IF PEEK (764) -255 THEN 20 
30 POKE 764, 255 
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IS QUE PASA CON EL POKE DE LA I NSTRUCCION 30? 

Te entrega un niimero, que es la representacj6n de la tec I a expresado en 

t^rminos de la flla y columna, en 'las cuales est^ la tecla. 

Ejecuta este pequeno programa, para ver que valores te entrega. ' - - . 

to WINT reEK (764) : GOTO 10 - , 

iY COMO VEO LOS VALORES? ' ' ' 

Cuando prestonas una tecla, te muestra el valor. 

APARECEN PUROS 255 

As! es. Observa que mientras no presiones una tecla, te aparecera el 255. 

iES VERDAD! CUANDO PRESIONO OTRAS TECLAS, APARECEN OTROS NUMEROS. 
LO QUE NO TENGO CLARO, ES EL POKE 764, 255. 

Poke 764, 255 el Imlna cualqujer valor almacenado en esa local lzacl6n. 

fi PUEDO TENER POKE 764 CON OTROS VALORES? 

Por supuesto, Y asl puedes ver como esta lnstrucci6n hace que el computador 
escrlba un caracter, autom^tlcamente. 

AH, YA Y AHORA SUPONGAMOS QUE YO QUIERO SABER SI LA TECLA SE 
PRESIONO UNA SOLA VEZ SE MANT I ENE PRESIONADA 

Mtra, este pequeno programa que encontraras a contlnuaci6n, Simula la accion 
de un 6rgano, Cuando preslonas una tecla, emlte un sonldo tanto tlempo como 
la tecla sigue presjonada, 

iY NO PARA? 

Si, para cuando dejas de preslonar la tecla. 

10 IF PEEK (53775) -255 THEN SOUND 0,0,0,0 : 60T0 10 
20 SOUND 0. 100, 10,8 : 60T0 10 
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6QUETIENE LA LOCALIZACION 53775? ■ 

La local Izac16n 53775 tiene el valor 255, si no se ha preslonado mnguna tecla. 

<LY QUE 0TR05 VALORES PUEDE TENER? 

Un 251 si una tecla se mantiene presionada y un 247, si la tecla SHIFT se 
esta presionando. 

Ya est^ bueno, ahora aprendamos otras cosas. (i-Conoces la tecla INVERSE? 

iUF! INO LA VOY A CONOCER! ES SUMAMENTE FACIL PRESIONARLA POR 
EOUIVOCACION, EN LOS MODELOS 600 Y 800. 

Bueno, si to est^s aceptando o ingresando informacjon a traves del teclado, 
seguramente no quieres que el usuario ingrese caracteres en Inverse o en 
minusculas. •; ., 

SI. UNA VEZ HICE UN PROGRAMA PARA COMPARAR UNOS NOMBRES, Y NO SABIA 
PORQUE NO ME RESULT ABA, AL FINAL. DESCUBRI QUE EST ABA COMPARANDO 
UNA MINUSCULA CON UNA MAYUSCULA. 

Claro que tambl^n querras, que a veces el usuario presjone la tecla INVERSE, 
de tal forma que todo lo que el ingrese, quede en modo Inverse. 

SI, PUEDE SER. . ... . , 

Pues blen, la local izacl6n 694 controla 6sto. 

icoMo? ": '^ ' .r" , / ' '. ■'' ,^ 

TIenes que hacerle un POKE con 128 para forzar los caracteres inverses y 
con paradeshabilitarlos, 

iESTO ME PUEDE SERVIR PARA LOS LI ST ADOS Y PANT ALL AS! 

No, no te equivoques. Esta local izacidn no afectara la forma en que se 
imprlme el texto, s61o la forma en que se recibe la informacibn del teclado. 
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YA, TE PROMETO QUE NO SE ME OLVIDA. 6Y EL 694, TAMBIEN CONTROLA LAS 
MAYUSCULAS/MINUSCULAS? 

La local izacj6n 702, se preocupa de las mayusculas y minusculas, 
almacenando el estado de la tecla CAPS/LOCK, Si la tecla CAPS esta 
presionada, es decir mayusculas, la local Izacion 702 guarda un 64 

6Y CUANDO ESTA EN MINUSCULAS, CUAL ES EL VALOR DE LA LOCALIZACION 
702? 

Un 0, Adem^s, puede tomar el valor 128 si est^ en modo CTRL. 

USEMOS EL POKE PARA PROBAR TODO ESTO, 

Puedes usar POKE para obllgar al teclado a que este en un modo determlnado. 
Pruebaesto. 

REM SAVE "D:VALVAR" • / 

5 GRAPHICS 

10 DIM A$(10):TRAP 100 

20 ? "INGRESA PARA MINUSCULAS"? "64 PARA MAYUSCULAS":? ■128 PARA MODO DE CONTRCl":? 

"<RETURN> TERMINA" 
30 INPUT X 

35 IF XoOAND X<>64 AND X0128 THEN 30 . ,;" "■ 

40 POKE 702.x ; 

50 INPUT A$ . , ' 

60 ? A$:?;? ' ' '"' ' ' 

70 60T0 20 ■^t: •. . " : '' - / 

100 ?T:END ^..^-^ •^.^,^-' '■ , [ ' . '' 

ENCUENTRO MUY UTIL ESTO DE MANE JAR EL TECLADO, PUEDO HACER COS AS 81 EN 
INTERESANTES. 

Hay algunas teclas con las que las cosas son un poco dlferentes. Las teclas 
START, OPTION y SELECT, no se pueden leer como otras teclas del teclado. 

6C0M0 LAS LEO? 

Puedes leerlas facilmente, revlsando la local Izacidn 53279. AquI tlenes una 
lista de los posibles va lores que te entrega; 
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7 no se ha preslonado ninguna tecla 

6 s61o la tecla START 

5 S6I0 la tecla SELECT 

3 s61o la tecla OPTION 

START, SELECT y OPTION stmultaneamente 

1 OPTION y SELECT juntas 

2 OPTION y START juntas 

4 SELECT y START juntas 

QUE TAL SI ME HACES UN PR06RAMA PARA DEMOSTRAR LO ANTERIOR, 
Aquj !o ttenes. 

REM SAVE "0:STARTOP" 

5 GRAPHICS 

10 ? "PRESIONA AL6UNA TECLA DE FUNCIONES" 

15 A-PEEK(53279) 

20 IF PEEK(53279)-A THEN 20 

30 ON A+1 60SUB 50,60,70,80,90,100,110 

40 GOTO 15 

50 ? -START+SELECT+OPTION'tRETURN 

60 ? "OPTION+SELECT+OPTION";RETURN 

70 ? ■OPTION+START+OPTION":RETURN 

80 ? "OPTION" ;RETURN 

90 ? "SELECT+START-:RETURN 

100 ? "SELECT":RETURN 

1 10 ? "START" ;RETURN 

6Recuerdas que algunas local jzaciones tienen diferentes funclones, cuando se 
lee ose escribe en ellas? 

SI, AL6UNA VEZ LO MENCIONASTE, 

La localizacion 53279 es una de ellas. 

ICOMO SI TUVIERA DOS PERSONAL I DADE5! 

M^s menos, Cuando la lees, te indica que teclas de la consola estan siendo 
presionadas en forma contlnua. 

l\ CUANDO PONGO AL6UN VALOR EN ESA LOCALIZACION? 



48 COMPU ATARI 

Si )e haces un POKE 53279,0 se genera un suave "click". 

6P0RQUE? T ap: 

El cero hace que el parlante suene, pero ei sistema operativo se encarga de 
hacerlo, poniendo un 8 en la locallzacion 53279 cada 1/60 de segundo, 
Haciendo varies POKE 53279,0 en esta locallzacion, creas un ruido como un 
zumbldo alarma, 

EN REAL I DAD NO TIENE NAD A QUE VER EL EFECTO DEL POKE CON EL DEL PEEK 
SOBREESTALOCALIZACION, 

Y para que veas lo util que son estas Instrucclones, te voy a ensenar como 
anular la tecla BREAK paraevltarquete listen tusprogramas BASIC, 

AH! QUE INTERESANTE. ASI Ml PROPIEDAD INTELECTUAL SE MANTENDRA 
INTACTA. NADIEPODRACOPIARhlSPROGRAMAS. 

SImplemente usa estas dos instrucclones POKE: 

POKE 16,64 : ■ 

POKE 53774.64 ' 

6Y COMO PUEDO VOL VER A UTILIZAR LA TECLA BREAK? 

La tecla BREAK se rehabilita, cambiandote a modo gr^fico o presionando 
System Reset. 

SEA, QUE SI QUIERO QUE LA TECLA BREAK PERMANE2CA ANULADA, iTENGO 
QUE PONER LAS 2 INSTRUCCIONES POKE DESPUES DE CADA INSTRUCCION 
GRAF I C A? 

Correcto, Ast es, y tambi^n despu^s de cada Instrucci6n OPEN, 

iY PUEDO ANULAR EL SYSTEM RESET? 

Aunque la tecla SYSTEM RESET no puede anularse, puedes hacer algo similar. 
Si haces POKE 580 con un valor distinto de 0, la tecla SYSTEM RESET actuary 
como si hubieses apagado y prendido el equlpo, Esto se conoce como "Partida 
en frio". 
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iPARTIDAENFRIO? 

Claro, igual que en un auto, sin calentar el motor. La "partida sobre caliente", 
es la que se ejecuta generalmente con esta tecia, cuando el computador ya ha 
estado funcionando. 

NO LE VEO MUCH A UTILIDAD, PERO COMO NUCHAS OTRAS COSAS, ALGUN DIA 
PUEDE SERVIRME. 

iQu6 bueno que pienses asll Ahora slgamos vlendo apljcaciones de POKE, 
Revisemos su uso en las instrucciones de graft cos. 

iME FASCINAN LOS GRAF 1 COS! 

Puedes usar POKE directamente sobre los registros de color para 
selecclonarlos, aunque es mas f^cil con la jnstruccion SETCOLOR. 

ALGUNA VENTAJA TENDRA... 

POKE es m^s r^pldo y compacto, ya que solo debe evaluar un numero en vez de 
cuatro. 

6S0L0 UNO? 

Ast es, Las local izaclones 708-712, corresponden directamente desde 
SETCOLOR a SETCOLOR 4. Cada local izacion, guarda tanto el color como 
la luminosidad. Simplemente, multiplica el numero del color (0-15) por 16 y 
sCimale la luminosidad (0-15). 

COMO QUEDA ENTONCES. 

SETCOLOR a, b, c corresponde a POKE 708 + a, b ^ 16 + c, 

Y eso no es todo, en cuanto a graficos. La local izacion 559, puede, entre otras 

cosas, encender o apagar la pantalla. 

6Y PARA QUE ME PUEDE SERVIR? 

Para hacer m^s rapidos los programas, Como toma algun tiempo desplegar la 
pantalla, el Atari puede corner un 30% m^s rapido con la pantalla apagada. 
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AHI ENTONCES PODRIA APA6AR LA PANTALLA CUANDO TENGA QUE HACER UN 
CALCULO LARGO. 

Sj, pero si es otra persona la que va a usar el programa, debes advertirle para 
que no se asuste. 

SI, POR SUPUESTO. TAMBIEN PODRIA APA6AR LA PANTALLA CUANDO TENGA 
QUE HACER AL6UN GRAF I CO COMPLiCADO Y PRENDERLA, PARA HACER QUE EL 
GRAFICO APAREZCA INST ANT ANEAMENTE, 

Y esta maravilla la logras con POKE 559, 0. , ■ . 
iY PARA VOL VER A NORMAL? 

Con POKE 559, 34 

Y seguramente, hat escuchado de las local izacjones 82 y 83. 

LA VERDAD ES QUE NUNCA. 

Bueno, estas 1 oca lizaci ones se usan principalmente para ajustar el ancho de la 
pantalla, ya que algunos teievlsores no pueden desplegar el ancho total de la 
pantalla. 

iYQUESEHACECONLALOCALIZACION 82 y 83? 

La locallzacJ6n82, controlael margen izquierdo, fc 

6QUE ES EL MARGEN IZQUIERDO? 

El margen Izquierdo, es el numero de espacios en bianco desde el borde de la 

pantalla. 

PEEK, te muestra el valor que tiene y POKE, le asjgna el valor que quieres. 

6CUAL ES EL ANCHO MAXIMO DE LA PANTALLA? 

40 columnas, y eso lo logras con POKE 82, 0. 

LA LOCAL I ZACION 93, SEGURO QUE ES PARA EL MARGEN DERECHO. 
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Asi es. El margen derecho es un numero entre y 39, y representa e! nCimero 

de espacios desde el lado izquierdo de la pantalla, 

Despues que cambies los margenes, las instrucciones PRINT siguientes se 

ajustan a los nuevos margenes. 

No hagas nunca el margen izquierdo mas grande que el derecho. 

iPORQUENO? 

iPru^balo y te dar^s cuenta! Ademas, ten presente que si dejas el ancho de la 
pantalla muy pequeno, no podr^s ttpear ningun comando, 

AH! PERO ALGUNA FORMA HABRA DE VOLVER A LA PANTALLA NORMAL. 

En cualquier caso, al presionar SYSTEM RESET, el valor del margen izquierdo 
vuelve a 2 y el derecho a 39. 

SABES LO QUE TE QUERI A PREGUNTAR, ES SOBRE EL CURSOR, NO ME GUSTA QUE 
ESTE SI EMPRE EN LA PANTALLA. 

Essumamentefacil deshabllitarlo. Simplemente, haz un POKE 752, 1, . 

^Y HABILITARLO? 

Con un en la misma locallzaclon. Despues que hagas un POKE a esta 
locallzaclon, el cursor no camblara hasta que la proxlma instrucclon PRINTlo 
mueva o hasta que llmpies la pantalla. 

6Y ESTA VEZ AFECTAN LOS GRAFICOS? 

Cualquier camblo en los modos gr^flcos re-almacena el cursor, lo mismo que 
SYSTEM RESET. 

iEL FAMOSO SYSTEM RESET! 

Ademas puedes controlar la forma en que aparecen los caracteres Inverses. 

iEN SERIO? 

SI. Con un numero 2 en la localizaci6n 755 los caracteres aparecen inversos. 
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Cada car^cter, es declr letra, nOmero o signo, se compone de una serle de 
puntos. En el estado normal, todos estos puntos aparecen en el color opuesto 
al del fondo de la pantalla y en el Inverso 

lYO SE! HE VISTO ALGUNAS LETRAS QUE APARECEN EN INVERSO. POR EJEMPLO, 
SI LA PANTALLA ES NEGRA, APARECE UN CUADRADO VERDE Y DENTRO DE ESE 
CUADRADO, LA LETRA EN NEGRO iSE VE BONITO! ^^ 

Un numero en la local izac16n 755, devuelve los caracteres a su estado 
normal y adjvlna, que pasa con un 1. 

iUN 1 ? NO SE, PARA Ml QUE NADA, YO SOLO CONOZCO DOS EST ADOS: INVERS6 

Y NORMAL 

No, hay muchos mas, Un 1 los hace Invisibles. Un 3 hace que todos los 
caracteres inversos aparezcan como espacios inversos (opacos), 

iTANTAS COSAS! ' ^ ^ •' ^ ' ^^^ - ' 

Y mas. Sumale 4 a cualqulera de los valores anterlores y todo el texto 
aparecer^ como si lo estuvieras proyectando en 1 espejo. 

iEN SERIO? SERI A IGUAL QUE EN LOS JUEGOS DE VIDEO. •' t : - 

Ademas, como el cursor tambien se puede considerar como un caracter, la 
local izacion 755, tambien afecta la apariencia del cursor. Prueba este 
programa cortito, para ver como puedes usar el 755, para que el texto 
parpadee: 
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100 PRINT "LOS CARACTERES INVERSOS PUEOEN PARPAOEAR" 

110 POKE 755.2 -PEEK (755) . -....- ,, 

120 FOR W- 1 TO 50 : f€XT W > - 

130 60T0 110 

L^i COMO SE DONDE ESTA EL CURSOR? 

Puedes leer f^dlmente la poslci6n del cursor, verlficando las local izaci ones 
84y85. La localizaci6n84guarda lafila. 
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AH! LA POSICION HORIZONTAL 

Correcto, y la local1zaci6n 85 la columna, o posic16n vertical. 

,.,0 SEA QUE EN LA POSICION 84 PUEDE HABER UN NUMERO DEL AL 23 Y EN LA 
85 UN NUMERO DEL AL 39. 

Y puedes usar la lnstrucc16n POSITION, para mover directamente el cursor a 
una poslc16n determlnada. Con POKE, puedes cambiar la fila o columna en 
forma separada. 

SEA QUE PUEDO MOVER EL CURSOR COMO YO QUI ERA; ARRIBA, ABAJO, AL 
LADO, ETC. 

Asl es, pero el cursor no se mueve hasta que n o uses una instrucclbn Print. 

HMMl 6SABES LO QUE SE ME OCURRE? LA POSICION 85, LA DE LA COLUMNA, SE 
PUEDE USAR COMO TABULADOR, PORQUE EL TECLADO NO TIENE Y EL BASIC 
TAMPOCO. 

IQue buena idea! Asl puedes hacer formatos de pantalla en forma mucho mas 
f^cll, porejemplo la llnea: 

10 Z - Z + 6 ; PRINT TAB (20-19»SIN (Z) ) ; CHR$ (42) : 60T0 10. 

escribe una curva sinusoidal en Basic Microsoft. 

iY SE PUEDE HACER EN ATARI BASIC? 

Porsupuesto; • , . 

10 Z - Z + 6 : POKE 85, 20 - 19 » (SIN (Z) ) : PRINT CHR|(42) : GOTO 10 

iCASI IGUAL! YO PENSE QUE ERA MAS LAROO. 

Si estamos trabajando en un Atari, no en cualquier cosa. 

En modo gr^fico, las local izaciones 84 y 85 controlan la posici6n del cursor 

gr^flco, no el cursor de texto. 
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i'i COMO CAMBIO EL CURSOR DE TEXTO EN LOS MODOS GRAFICOS? 

Con las local izac I ones 656 (f lla) y 657 (columna). Tambl^n puedes camblar la 
local izacl6n 201, que guarda el numero de espacios entre las comas. 

iDE QUE ME HABLAS? ' ;..^?.. 

Mira; cuando tu imprimes una lista de variables (como PRINT A,B,C$) cada 
vez se tabula dentro de una zona separada de 10 espacios de ancho. Si lo que 
est^s Imprimlendo sobrepasa la zona que tiene aslgnada, se pone en la 
slguiente y todos los datos que siguen se corren. 

AH, YA VOY ENTENDIENDO. 

Puedes cambiar el ancho de la zona haciendo un POKE 20 1 , ancho, 
Nunca pongas un en esa local izacl6n porque el computador queda dando 
vueltas y mas vueitas, forz^ndote a presionar SYSTEM RESET o cortar el 
poder del equipo para que puedas retomar el control. 

PERO DEBE SER UTIL, CUANDO SON NUMEROS PEQUENOS, PARA QUE NO QUEDEN 
MUY SEPARADOS. ^ ,r -n^ ! ; 

Si, para eso se usa, y ahora, pasando a otra cosa isuena tu diskettera cuando 
leesograbas? 

iTERRIBLEI PARECE QUE ESTUVIERAN CORTANDO CARNE RALLANDO ALGO. 
CLARO QUE SIRVE PARA CERCIORARSE DE QUE ESTA LEYENDO GRABANDO. 

Hay personas que pueden distinguir el ruido que hace al escribir del que hace 
al leer, e Incluso puden decir si hubo algun error, 

COMO ALGUNOS MEDICOS. LO QUE ES YO, DE REPENTE PIENSO QUE ME VOY A 
VOL VER LOCO CON TANTOS RUIDOS. , " . 

La soluci6n; POKE 65,0 inhabillta el parlante, de modo que no se note ningun 

ruido. ^,, .„ ,, ^ . , . ,. „ .^ ., .,. 

iSENSACIONAL! PERO <!,Y SI SUBO EL VOLUMEN? 
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ACin asj, claro que en ese caso escucharas un leve sonjdo. : • ^ 

PERO I MAGI NATE NO SENT I R LA DI5KETTERA, Nl LAS TECLAS... 

iUn momento! Este POKE no tiene nlngOn efecto sobre las teclas y tampoco 
sobre la jnstruccl6n SOUND, 

NOPODRIASERCIERTOTANTAMARAVILLA MEJOR QUE SUENE TODO, 

Para eso, haces un POKE 65 con cualquter valor distinto de cero. 
No te he preguntado ique modelo es tu Atari? 

YO TENGO EL 600XL Y EN EL COLEGIO USAMOS UN 800XL, SON BIEN PARECIDOS. 

AsJ es. El Atari 600XL y el 800XL usan el Sistema Operative XL, que tiene 
considerable podery flexibilidad. 

6YQUESIGNIFICAES0? 

En pocas palabras, que tienes muchos mas POKE'S para probar. Recuerda, eso 
si, que ninguno de estos POKES funcionara en los computadores Atari 400 y 
800 corrientes. ( No perteneclentes a la linea XL). 

A VER, CUALES SON ESOS NUEVOS POKE 

El POKE mas novedoso, permite un movimiento de llneas (scrolling) en modo 

gr^f ico 0. 

SImplemente ingresa poke 622.255 : graphics 

ME TINCA QUE PASA MUY RAPIDO. LE VOY A AGREGAR: 

FORI-l TO 1000: PRINT I: NEXT I 

PARA FIJARME BIEN. 

A diferencia del movimiento normal, que mueve una linea de texto a la vez, el 
scrolling va moviendo los caracteres en forma mas suave, 

UN AMIGO MIO LO HIZO EL OTRO DIA iES BIEN BONITO EL EFECTO! CLARO QUE 
DESPUES ME IBA A MOSTRAR EL PROGRAMA Y TUVO PROBLEMAS CON EL EQUIPO, 
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Lo que pasa, es que este movlmiento afecta algunos programas. Para 
inhabllitarlo, escribe POKE 622,0 ; GRAPHICS 



>' '' - ■ 



iSOLO SIRVE CON MODO GRAFICO 0? 

SI, asl es. '"''■' ''^'' ■ 

Los modelos Atari XL, tienen todos una tecla de ayuda (HELP). Aunque no la 
usa ni el sistema operative nl el Basic, puedes leer esta tecla en tus proplos 
programas yactuarsobre el la. •:>! 

VEAMOS, VEAMOS. ESTO SE PONE INTERESANTE. ■-' "^ ' '^ 

Una vez que se presiona la tecla HELP, la local Izaclon 732 guarda un 17 y 
continuara con este valor hasta que hagas un POKE 732,0. Debes veriflcar 
que la local Izaclon 732 tenga un valor distlnto de 0, y luego haces POKE 
732,0 una vez que has actuado sobre la tecla. 

SI se presiona SHIFT junto con HELP, la locallzaci6n 732 tendra un 81, y un 
145, Indica que se ha presionado CTRL-HELP, 

DIME UNA COSA. EN ESTOS MODELOS QUE SON MAS AVANZADOS 6SE PUEDE 

■J • ■ * .- 

SUPRIMIR EL RUIDO DE LAS TECLAS? ALGUNAS PERSONAS LO ENCUENTRAN 
UTIL PARA LA FAMOSA "DIGITACION AL TACTO", PERO YO, FRANCAMENTE, LO 
ENCUENTRO ABURRIDOR. 

En realldad, en los modelos 600 y 800, la unica forma es cortando los 

alambres que van al parlante, pero con los modelos XL puedes hacerlo. 

Simplemente, con POKE 731,255. Un valor te permite seguir escuchando el 

click de las teclas, 

Otra cosa Interesante es la posibilidad de presionar una tecla y que esta se 

replta. Puedes cambiar el lapso de tiempo que transcurre entre una y otra 

letra. 

6QUE ES ESO POR FAVOR? 

Existen dos factores en la repetlcl6n de las teclas, cuando preslonas una 
tecla, no quieres que se replta en forma instant^nea. 

si,Asi ES,""'''-' "^:^'^:-v^- < ^^> ■• -■■■ -■•-■■ '■ y ' ' -^ 
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Por eso, el Sistema Operative espera 4/5 de segundo antes de comenzar a 

repetir; y una vez que comienza la repeticion, el otro factor de tiempo es la 

velocldad con la que la tecla se repite, que es alrededor de 10 veces por 

segundo. 

En el sistema operativo, estos tiempos de espera se expresan en multiplos de 

1/60 por segundo. 1 valor de 60 es un segundo completo, 30 es medio 

segundo, y asl sucesivamente. ' 

AH, LO QUE TU ME QUERIAS DECIR ES QUE SE PUEDEN CAMBIAR ESOS LAPSOS DE 
ESPERA. 

Correcto. Para camblar el tiempo, antes que la tecla se empiece a repetir, se 
usa POKE 729, y para especif icar el tiempo entre repeticiones POKE 730, 

Y CUALES SON LOS VALORES ESTANDAR. 
Para el 729, un 48 y para el 730 un 6, 

IVEAMOS UN PROGRAMAI IME ENCANTAN LOS PROGRAMASI iQUE TE CUESTAI 

Est^ bien, esta bien. Haremos un programa bien complete, que te hara facil 
mirar dentro de la memoria de tu Atari. Tambien podras cambiar la memoria y 
hasta convertir numeros decimales, hexadeclmales y binarios. 
Pero antes, es importante que aclaremos algunos conceptos; 

- el contenido de todas las direcciones de memoria, esta formado de un 
byte que corresponde a... 

18 BITS! 

Correcto, Estos 8 bits o digltos binarios, s6lo pueden contener numeros 
binarios. 

SI, SOLO I's y O's { Unos y ceros). 

Y el 1 indica que el bit est^ "encendido" (ON) y el que el bit est^ "apagado" 
(OFF). Los bits se numeran del al 7, de derecha a izquierda. 

Tu Atari s6lo puede entender lenguaje binarlo. 
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iY CON LOS CARTRIDGES? 

Cuando insertas un cartridge de lenguaje en tu equlpo, le estas proporcionando 
al Atari un Interprete que te permlte comuntcarte con el, a traves de un 
lenguaje como el BASIC, en alguna forma util y signjftcatjva. 

lYA, VAMOS AL PROGRAMAI ^ ■ 

M^s adelante, encontrar^s el llstado del programa que te mencion^, Escrlbelo 
y guarda una copia antes de usarlo, , v^, 

Cuando ejecutas el programa, te aparecer^ un menu con nueve ope i ones. 

6NUEVE? iQUEHARTAS! 

Asi es. La opcion 1 te permite examinar cualquler local Jzacl6n de memoria y 
ver su contenldo en hexadecimal, decimal y binario. 

La opcJ6n 2 te permite cambiar la memoria al usar esta opcion. Si haces un 
POKE de un numero equivocado en una local izaci6n equivocada, corres el 
riesgo de echar a perder tu si stem a. 

IHUY, QUE SUSTO! PERO HABRA ALGUNA SOLUCION SI ME EQUI VOCO. 

Si, tendr^s que apagar y encender el equipo para recobrar el control 

A VER, DAME EJEMPLOS DE LAS LOCAL I ZAC I ONES DONDE PUEDA HACER 
CAMBIOS. 

Algunos lugares interesantes, donde hacer cambios, son las localizaciones 
53760-53768 (registros de sonido), 53266-53274 (los registros de color 
para los juegos con graficos), y 53248-53255 (la posicibn de los registros 
gr^ficos para los Juegos), 

Puede que aparezcan extrafias cosas en la pantalla cuando pruebes con estos 
registros, pero presionando SYSTEM RESET te sacara de cualquier lio en el 
que te hayas metido. . , 

BUENO, Y QUE PASA CON EL RESTO DE LAS OPCIONES. .. 
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Las opclones 3 a 8, son rutinas de conversion. Oberva que si est^s Ingresando 
un numero hexadecimal para convertlr, slempre debes Ingresar dos digitos, 
aunque el primero sea un 0. 

6YSISEME0LVIDA? 

Tendras una respuesta erronea. 

La opcion 9, te permite poner un Programa en lenguaje de maquina en la 

memorla. 

Puedes hacerlo en forma hexadecimal o decimal y puedes especificar la 
direccion de comienzo (]536 es generalmente un buen punto de comienzo para 
programas cortos en lenguaje de maquina). 

Debes ingresar las instrucciones una a una. Una vez mas, se miuy cuidadosos 
al escribir las instrucciones, un error y .,. 

iPIERDO EL CONTROL DE Ml ATARI! SI, LO TENGO BiEN PRE5ENTE. 

Cuando termines de ingresar la ultima instruccion, presiona RETURN. El 
programa te preguntara "6ES LA ULTIMA IN5TRUCCI0N?" para asegurarte si 
haz presionado la tecla RETURN por error Si respondes con una "N", te :^ 
devolvera a la rutina permitiendote ingresar mas instrucciones. Sin embargo, 
una "S" hara que el programa te pregunte si quieres e jecutar el programa que 
ingresaste. En ese punto, una "N" te devolvera al Menu Principal 

PROGRAMA PARA ENTENDER PEEK v POKE 

REM SAVE "D:PEEKP0KE" 

5 Dtl1A$(2XAD$( 1 ),B$(4)X$(5XRESP$( 1 ),B!N$(8XM0D0$(3),INST$(6) JD(2), 
N$(8)J!TUL0$(20)XINEAj(22),N0nBRE$ (22) 

6 I1ENU=600;CL}CK=6000:B$="0000*' 

7 GOTO 5000 

39 REM SUBRUTINA DE CONVERSION DE DECIMAL A HEXADECIMAL 

40 N-PEEK{DIR£CCI(^);NI=PEEK(DIRECCfON) 
60 h2,08 

70 TEMP'N 

7 1 N=INT(N/ 1 6):TEMP=TEMP-N'* 1 6 

72 IF TEMP<10 THEN A*(M)=STR$(TEMP):60T0 90 
80 A$(1JKHR$(TEMP-10+ASC{"A")) 

90 IF NoOTHEN Hh I; GOTO 70 

91 IFM«3 OR M»8 THEN ? "HEX=";A$(i,2):A$-"[J";B$='' ^C*-** ^RETURN 
95 IF M>4 THEN RETURN 
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100 REM 5UBRUTINA DE CONVERSION DE HEXADECIMAL A BINARIO. 
no IF A$(lJKl,r OR A$(1JK0" THEN B$='*0000" ,. - .. ,v 

120 IF A$(U Kr THEN B$»"000r 

130 IF A${U)-"2" THEN B$-**0010" 

MO IF A$(1JK3" THEN B$-*'00n" 

150 IF A$(t,lK4" THEN Bt^'^OlOO" 

160 IF A$(1JK5" THEN Bt-^OtOP 

170 IF A$(1,1K6" THEN B$="0110" 

180 IF A$()JK7" THEN B$-'*Onr 

190 IF A$(1,l)-"8" THEN B$="1000" 

200IFA$(UK9" THEN B$-"100]" 

210 IF A$(1J)**'A" THEN B$="1010" 

220 IF A$(MKB" THEN B$="10n" . / . ... . ■ . 

230 IF A$(1,1KC' THEN B$=*n00" 

240IFA$(MKD" THEN Bl^^nor 

250 IF A$(UKE" THEN B$="niO" 

260 IF A$(MKF" THEN B$="inr . ." 
270 IF A$(2,2)="0" THEN C$=*'0000" 
280 IF A$(2,2Kr THEN C$="000r 
290 IF A$(2.2)-"2*^ THEN C$="0010** 
300 IF A$(2,2K3** THEN Cj="00n" 
310 IF A${2,2K4" THEN C$="0100'' 
320 IF A$(2,2K5'* THENC$="010r 
330 IF At(2,2K6" THEN C$="0 110" 
340 IF A$(2.2>"7" THEN C$="01 1 1" 
350 IF A${2,2)="8" THEN C$«"1000" 
360 IF AJ(2,2K9** THEN C$-" 1001" 
370 IF A$(2.2KA" THEN C$="1010" 
380 IF A$(2,2KB" THEN C^"101 V 
390 IF A$(2,2KC" THENC$-"nOO" 
400 IF A$(2,2KD** THEN C$=" 1101" 
410 IF A$(2,2)=T" THEN C$="niO" 

420 IF A$(2,2)-T" THEN C$=" 1 1 1 T 

421 IF M«4 OR M=7 THEN '? •*BiNARIO-";B$;C$:A$-"l,r:B$-" ":C$=" ":RETURN 

422 ? " HEX:";A$(I.2):? "DECIMAL ;";N1:? " BtNARIO; ";B$:C$:? "PEEKC"; 

DIRECCION;*>";PEEK(D(RECCtON) 
440 !FM=1 OR M-2 THEN A$-"l,r:B$ - " ":C$=" ";RETURN 
450 IF M«3 THEN ? "HEX-";A$(I,2):? :A$-"(,]":RETURN 
460 IF M=4 THEN ? "BtNARIO=";B$;C$:B$=" "iCj-" "iRETURN 

499 REM SUBRUTINA DE CONVERSION 0£ BINARIO A HEXADECIMAL 

500 TRAP MENU 

501 B7*VAL(BIN$(1,1)):B6=VAL(BIN$(2,2)):B5=VAL(BIN$(3,3)):B4=VAL(BIN$ (4,4)) 
505 IF BlN$-"00000000" THEN PKR-0: GOTO 526 

510 B3-VAL(BIN$(5,5)):B2-VAL(B1N$(6,6));B1«VAL(BIN$ (7,7)):BO=VAL (BIN$(8,8)) 
520 PKR-INT(B7*2^7+B6»2*6+B5*2^5+B4* l6+83»8+B2»4+Bl*2+B0) 

525 IF B7 AND NOT B6 AND NOT B5 AND NOT B4 AND NOT B3 AND NOT B2 AND NOT Bl AND 
NOT BO THEN PKR-PKR-1 

526 IF M=»6 THEN ? "D£CIMAL-";PKR:RETURN 

527 IF M=8 THEN RETURN 

530 POKE DIRECCION.PKR:RETURN 

599 REM MENU PRINCIPAL 

600 ? CHRt(125):P0KE 752. 1 :P0SIT10N 16,4:? "MENU" POSITION 16,5:? " ":? 
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610 POSITION 6,8:? "1 REVISAR CONT.DE tlEMORIA'rPOSITION 6,9:? "2 CAMBIAR CONT.DE MEMORIA" 
612 POSITION 6,10;? "3 CONV. NRO. DECIMAL A HEXADEC.":POSITION 6,1):? '4 CONV. NRO. DECIMAL 
A BINARIO" 

615 POSITION 6,12;? "5 CONV. NRO, HEXADEC. A 0EC1MAL";P0SITI0N 6,13;? "6 CONV. NRO. BINARIO A 
DECIMAL" 

616 POSITION 6,14:? "7 CONV, NRO. HEXADEC. A BINARIO":POSITION 6,15:? "8 CONV, NRO, BINARIO A 
HEXADEC," 

617 POSITION 6,16;? "9 IN6RESAR POKES SUCESIVOS" 

618 POSITION 5,17:? "10 TERMINA- 
620 TRAP MENU 

630 POSITION 6.22:? "ELIJA OPCION ";:INPUT M:? "r;ON M 60T0 
1000,1050,1100,1100,1200.1300, 1400,1500,1600,6010 

699 REM SUBRUTINA DE CONVERSION DE HEXADECIMAL A DECIMAL 

700 FOR 0=1 TO 2 

701 IF INST$(Q.Q)=-0" THEN TD(Q)=0 
705 IF INST$(Q.QKr THEN TD(Q)=1 
710 IF INST$(Q,Q)="2" THEN TD{Q>=2 
715 IF INST${Q,Q)="3" THEN TD(Q)-3 
720 IF INST|(Q,Q)-"4' THEN TDCQM 
725 IF INST$(Q,Q)-"5" THEN TD(Q)-5 
730 IF INST$(Q.Q)="6" THEN TD(Q)=6 
735 IF INST$(Q,Q)-"7- THEN T0(Q)-7 
740 IF iNST$(Q.Q)»"8" THEN TD(Q>^ 
745 IF INST$(Q.Q)-"9" THEN TD(Q)-9 
750 IF INST$(Q,Q)-"A" THEN TD(Q)-10 

755 IF INST$(Q.QKB- THEN TD(Q)=II 

756 IF INST$(Q,Q)="C" THEN TD(Q)=12 

757 IF INST$(Q,Q)="D" THEN TD(Q)-13 

758 IF INST$(Q,QKE- THEN TD(Q)=I4 

759 IF INST$(Q.Q)-"F" THEN TD(Q)-15 

760 NEXT Q;INST=TD(1)'' 16+TD(2):IF M-5 THEN ? "DECIMAL=";INST 
770 RETURN 

999 REM "1" REVISAR LOS CONTENIDOS DE MEMORIA 

1000 ? ;? :?" iOUE DIRECCION QUIERES VER?";INPUT DIRECCI0N;60SUB 40; GOTO 1000 
1040 TRAP 40000 

1049 REM "2" CAMBIAR LOS CONTENIDOS DE MEMORIA 

1050 ? :? "POR FAVOR IN6RESA LA DIRECCION A LA CUAL DESEAS CAMBIAR EL CONTENIDO";:INPUT 
DIRECCION 

1060 ? :? "AHORA IN6RESA EL NUMERO EN BINARIO QUE DESEAS PONER EN EL RE6ISTR0(L0S 

BITS SE NUMERAN DE 7 A OESDE LA I" 
1070 INPUT BIN*:60SUB 500:? :? -PEEK(";DIRECCION;>";PEEK(DIRECCION):? :? :60T0 1050 

1099 REM -3" Y "4" CONVIERTEN UN NUMERO DECIMAL A HEXADECIMAL A BINARIO" 

1 100 ? ;? :? "INGRESA EL NUMERO QUE QUIERE C0NVERT1R";;1NPUT N;60SUB 60:60T0 1 100 

1199 REM "5" CONVERTIR UN HEXADECIMAL A DECIMAL" 

1200 ?:?:? "INGRESA EL NUMERO QUE QUIERE C0NVERTIR(2 DIGITOS)";: INPUT INST J :IF 
LEN(INSTt)>2 THEN ? "r.QOTO 1200 

1210 60SUB 70O:eOT0 1200 

1299 REM "6" CONVERTIR UN NUMERO BINARIO A DECIMAL 

1300 ? ;? :? "IN6RESA EL NUMERO QUE QUIERES CONVERTIR"; :INPUT BINJ: 60SUB 500:GOTO 1300 

1399 REM "7" CONVERTIR UN HEXADECIMAL A BINARIO 

1400 ?;?:? "IN6RESA EL mMERO QUE QUIERES C0NVERTIR{2 DI6IT0S)";: INPUT At:eOSUB 

110:6OTO1400 
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1499 REM "8" CONVERTIR UN BINARtO A HEXADECIMAL 

1500 ? :? :? "INGRESA EL NUMERO QUE QUtERAS CONVERTIR"; :INPUT B!N$: 60SUB 500:N=PKR;eOSUB 
60:60T0 1500 

1599 REM ^9- IN6RESAR UNA SERIE DE POKES EN LOCAL IZACIONES D£ MEMORIAS SUCESiVAS 

1600 ? :? :? 1N6RESAR INSTRUCCIONES EN F(^MA DEC!MAL(D) HEXADECIMAL(Hr;:tNPUT nODOt 
1610 ? ;? XUAL ES LA DiRECCION !NICIAL(EN DECIMAL, POR FAVORr;; INPUT 

OIRECCION:DIRECCiONI«DIRECCION 
1 620 IF MODOtC 1 . 1 h^H" THEN HEX- 1 
1 625 IF MODO$( 1 , 1 ^^D" THEN HEX-0 
1630 ? ;? "AHORA INGRESA LAS INSTRUCCIONES UNA A UNA" 
1640 IF HEX THEN TRAP 1700:INPUT INST$:60SUB ?00:60T0 1660 
1650 TRAP 1 700 :iNPUT INST 

1660 POKE DIRECCi(^JNST:DIRECCION-DtRECCtON+1;IF HEX THEN 1640 
1680 GOTO 1650 

1700 ? :? ^ES LA ULTIMA lNSTRUCCtON?'*;:!NPUT RESP$:IF RESPtCKDo-S" THEN 1640 
1720 ? :? "OESEAS EJECUTAR EL PR06RAMA G^E iNGRESASTE RECIEN";: INPUT RESP$:IF 

J^SP$( 1,1 KS" THEN 1750 
1740 GOTO MENU 
1750 TRAPMENU;X-USR(DIRECCtON1) 

4999 REM * * « * * TITULO iN!CIAL,SETCaOR=FONDO NEGRO LETRAS BLANCAS 

5000 SETCOLOR 2,0,0:SETCaOR U0,10:? CHR${125):P0KE 752,1;TITUL0$= "JUEGA AL PEEK Y 
POKE":LINEA$-"PRESENTADO POR" 

5001 NOMBRE$-"EDICtONES COMPUGRAFICA" 
5370LN«INT(LEN(TlTULOt)/2);FC^Z-1 TO LN:POSIT!ON 17-Z,7:? "^"; 

T1TUL0$(LN-Z+ 1 XN+Z);**'* ";GOSUB CLICK 
5400 NEXT ZlN-tNT(LEN{LINEA$)/2):F0R Z=1 TO LN:POSiTiON 17-Z,9 :? "**"; 

LiNEA$(LN-Z+ 1 .LN+Z);"* ";GOSUB CLICK 
5440 NEXTZ:LN-INT{LEN(N0MBRE$)/2):F(PZ=1 TO LN;POStTION 17-Z,1 1:? ***"; 

N0MBRE${LN-Z+1,LN+Z); "»":GOSUB CLICK:NEXT Z 
5500 FOR ESPERA-1 TO 500:NEXT ESPERA:GOTO MENU 
6000 FOR TICK=0 TO 3:P0KE 53279,0:NEXT T!CK:RETURN 
6010 POKE 752,0 :GRAPHfCS 0:END 
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CAPITULQ 4 
USQ QF CASSFTTFRA Y DISKFTTFRA 



AH! AQUI SI QUE TE VOY A COMER A PREGUNTAS HACE HARTO TtEMPO QUE 
TEN60 DUDAS SOBRE LAS CASSETTERAS Y DISKETTERAS 

d-En seno"^ No me lo haDias dicho 

SE DICEN NUCHAS COSAS DEL ATARI, QUE PUEDE HACER ESTO Y LO OTRO PERO 
NO SE CUALES SON CIERTAS. POR EJEMPLO, 4 VECES HE TENIDO PROBLEMAS CON 
LOS ARCHIVOS QUE 6RAB0 EN CASSETTES, ES TERRIBLE BUSCAR UN ARCHIVO 
EN UN CASSETTE A VECES SE TRANSFORMA EN UNA HAZANA 

No exageres Una forma facil de recordar es escnbir la descripci6n del archive 
y su ubicacion en un papelito. 

Y SI SE TE PIERDE EL PAPELITO iSERIA TODQi Y NO ES DE LO MAS ENTRETENIDO 
CAR6AR UN ARCHIVO TRAS OTRO HASTA LLE6AR AL APROPIADO 

Veras que Ids programas que vienen mas adeiante son fantasticos Los debes 
usar de la siguiente forma: 

- Comienza cargando un cassette y poniendo en el contador 

- Avanza la cinta hasta que el contador sea 20. 

- Graba hasta seis archives en la cinta, cuidando de anotar el nombre (hasta 
16 caracteres), la ubicacion del comienzo de! archive y el comando que usaste 
para grabar el archivo. 

6Y QUE PAS A DESPUES"? 

Cuando estes listo, rebobina la cinta y ejecuta el Programa I Te preguntara el 
nombre que quieres ponerle a! cassette 

6Y'? 

Y debes responderle con un nombre de hasta 16 caracteres El programa luego 
te preguntara por los nombres, local izaciones y comandos que usaste para 
grabar los 6 archives 
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Y YO LE RESPONDO CON EL NOMBRE. EL VALOR QUE TENIA EL CONTADOR AL 
EMPEZAR CADA ARCHIVO Y LA PRIMERA LETRA DEL COMANDO QUE USE PARA 
6RABARCADAARCHIV0, 

dComo? iAcaso conoces los programas? 

NO, PERO ES LO TIPICO. S! A Ml TAMBIEN SE ME OCURREN COSAS DE REPENTE, 
OYE „„ d,Y SI TENGO MENOS DE 5 ARCHI VOS? 

Si tienes menos de 6 archives, responde at mensaje que te pide e! nombre del 
ultimo archivo presionando dos veces ESC y luego RETURN. Asi el programa 
termtna de preguntarte y almacena lo que se podria llamar "el archivo del 
ststema de clnta" en e! cassette. 

SUPONGO QUE ESE ARCHIVO CONTIENE LA INFORM AC ION QUE RECIEN INGRESE. 

Asi es, toda la informacion necesaria para local izary cargar todos los 
archives queda grabada en forma segura en el raismo cassette. 

AHORA SIGAMOS CON EL PROGRAMA 2 

El Programa 2 lee este archivo del sistema, escribe un menu en la pantalla y 
te pide que selecciones el numero del archivo que quieres cargar. 

Y NO ME DIGAS QUE CARGA ESE ARCHI VO 

No seas flojo, algo de trabajo para ti tambien El programa te indica el numero 
del contador en el que encontraras el archivo. Avanza la cinta y simplemente 
presiona RETURN para cargar la cinta. 

6YSIMEEQUIV0C0? 

El programa te da otra oportunidad para cargar el archivo. 

ME 6USTARIA QUE ME EXPLICARAS UN POCO MAS EN QUE CONSISTEN ESTOS 
PROGRAMAS. 

La clave de estos programas reside en entender el manejo de strings de'^ Atari 
BASIC, 
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AHI ENTONCES NO TENDRE NINGUN PROBLEMA, YA, SI6AM0S. 

Como sabes, un string es una secuencia de 1 6 m^s caracteres, En el Programa 

1, que encontrar«is mcis adelante, la Instrucclon 40 es una lnstruccl6n de 

dimenslonamlento (DIM) define las variables tipo string que se usan en el 

programa. 

CBUF$ es el string que se pondr^ en el buffer del cassette y luego se escribe 

en la cinta, 

6QUE COSA ES ESE BUFFER DEL CASSETTE? 

Es un ^rea de memoria RAM desde la cual Atari graba a la cassettera, 

BUENO, 6Y EL PROGRAMA 1 USA MAS STRINGS? 

Si, varlos m^s. Los usa para guardar los Inputs ( ingresos) desde el teclado. 

TE REFIERES A LAS RESPUESTAS QUE UNO ESCRIBE EN EL TECLADO ^VERDAD? 

Asl es. Como los nombres de archtvo, las locallzaciones y comandos se 
Ingresan a CBUF$ uno tras otro. S se usa como una medida para guardar 
espacio, 

NO ME IMAGING COMO VAN QUEDANDO TANTAS COSAS EN CBUF$. 

Para agregar caracteres a CBUF$, como ocurre en la linea 110, se usa la 
siguiente expresi6n: 

CBUF$ (principle, fin) - TN$ 

6QUEESPRINCIPI0YFIN? 

principio y fin son las posiciones de inicio y termino en el string CBUF$. 

iYTNS? \ 

TN$ contiene el string que tlene que ublcarse en CBUF$ en las posiciones 
indicadas por prlncipjo y f In. 
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AH. YA ENTENDL MANEJANDO LAS P05ICI0NES DE INICIO Y FIN DE LOS DAT05 
DENTRO DE CBUF$, SE LLENA EL STRING CON LOS DATOS, UNO CADA VEZ. 

Muy bien. Con esta expllcacl6n y tu Manual de Referenda del Atari seras capaz 
de desclfrar el resto del programa. 

iDESCIFRAR? ESO SUENA COMO QUE EL PROGRAMA ES MUY DIFICIL, 

No, en absolute. Veras lo facil que es. Ah! antes que se me olvide, para 
apresurar la carga de estos programas, puedes hacerlos mas pequenos. 

Y ASI HAY MENOS QUE CARGAR. DIME, 6QUE PUEDO SUPRIMIR? 

Puedes suprimir las instrucciones REM, sustituir las variables por 
constantes, como se explica mas abajo, poniendo dos lineas de c6dlgo en una 
sola, separadas por dos puntos y sustltuyendo la palabra PRINT por un signo de 
interrogaci6n. (?). 

iLISTO! 6ME DAS EL PROGRAMA? 

PROGRAMA 1 

REM SAVE "D:ARCHCAS 

10 REM * "PROGRAhA QUE CREA UN ARCHIVO DE DIRECTORIO 

15 REn*« EN CASSETTE 

20 ?CHR$(]25) 

50 REM **DEFINIC!ON DE VARIABLES V CONSTANTES 

40 DIM CBUF $( 1 28),FN$( 1 2),CT$(3) JN$( 1 6),SM$(t );S- 1 6 

50 REM * *COriPLETA EL BUFFER DEL CASSETTE CON BLANCOS 

60 FOR N'l TO I28:CBUF${N,N)-" **:NEXT N 

70 REM »♦ * tNGRESO DEL NOMBRE DEL VaUMEN DEL CASSETTE 

80 ? 1NGRESA EL NOMBRE DEL CASSETTECMAXIMO 16 CARACTERES)" 

90 INPUT TNt 

100 REM ^ *PONE EL NOMBRE DEL CASSETTE EN EL BUFFER 

no CBUF${US)-TN$ 

120 REM * NN6RESA INFORMACION DE HASTA 6 ARCHIVOS 

130 F0RN-1T0 6 

HO ? "IN6RESE NOMBRE DEL ARCHIVO ";N 

150 INPUT FN$ 

160 IF FN$(1,IH:HR${27) THEN GOTO 270:REM **CUANDO SE PRESIONA LA TECLA ESCAPE SE 

TERMINA EL INGRESO 

180 CBUF J(N»S+ 1 ,N*S+ 13)=FN$ 

190 ? lECTURA DEL CONTADOR PARA ESTE ARCHIV0(3 DlGITOSr 

200 INPUT CT$:CBUF${N'»S+13,N'»S+15) = CT$ 

210 REM »» *» FORMA DE ALMACENAR EL ARCHIVO 

220 ? "QUE COMANDO SE USO PARA 6RABAR?" 
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230 ? "CSAVE/SAVE C/LIST C-(C,S,Lr 

240 INPUT Sh$ 

250 CBUF$(N»S+S,N^S+S>Sn$ 

260 NEXT N 

270 REM * * 6RABA EL ARCHt VO DIRECTORIO EN EL CASSETTE 

280 ? "PRESiONA PLAY/RECORD-RETURN " 

290 OPEN * 1,8,0. Xr 

300 ? "6RABAND0 EL DIRECTORIO " 

310 ?*1;CBUF$ 

320 CLOSE * 1 

PROGRAMA 2 

10 REM ^ *DESPLIEGA UN MENU PARA LEER LOS ARCHIVOS 

20 ? ")" 

50 REM * *DEFtNICION DE VARIABLES Y CONSTANTES 

40 DIM CBUF$(128), FN$(t2), CT$(3). TN$(I6), SMt(U:S=16 

50 REM ** OPEN CASSETTE 

60 ? "PRESIONA PLAY Y LUE60 RETURN" 

70 OPEN *l,4,0,Xr 

80 REM * HLENA EL BUFFER DEL CASSETTE CON BLANCOS 

90 FOR N-l TO I28;C&UF$(N,N>"";NEXT N.REM ^'^LEE E tMPRIME EN LA PANTALLA EL NOMBRE 
DEL CASSETTE 
100 ? CHR$(125);"LEYEND0 EL DIRECTORIO DEL CASSETTE- 
MO INPUT *1;CBUF$:? 1" 
120 ? CBUF$(1J5); ? 

130 REM * »* tMPRIME EL MENU DE ARCHIVOS EN LA PANTALLA 

140 FWlN-lTOe 

150 FN$=CBUF$(N*»S+1,N»*S+13) 

160 CT$=CBUF$(N»S+13,N*S+15) 

170 SM$=CBUF$(N**S+S,N*S+S) 

180 ? N;" ^FNlr "; CT$r ";SM$ 

190 ? 

200 NEXT N 

210 REM *♦ * PREGUNTA POR EL PR06RAMA QUE S£ QUIERE C AR6 AR 

220 ? :? 1N6RESA EL NUMERO DEL PR06RAMA OJE GlIIERES EJECUTAR " 

230 INPUT N 

240 FN$=C&UF$(N*S+1,N*S+13) 

250 CT$=CBUFt{N'»S+13,N'»S+15) 

260 ? "AVANZA LA CINTA HASTA EL ";CT$ 

270 TRAP 350 

280 REM * * DECIDE CON QUE COMANDO CARGARLO 

290 IF CBUF$(N'»S+S,N**S+S)=X" THEN 330 

300 IF CBUFJ(N*S+S,N*S+SKE" THEN 340 

3 To REM * * C AR6 A EL PR06RAMA 

320 LOAD X:":? "PRESIONA RETURN " 

330 CLOAD :? "PRESIONA RETURN" 

340 ENTER X:" 

350 ? "RETROCEDE LA CINTA AL ";CTt; 

360 GOTO 290 
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iTe gustaron? 

CLARO QUE SI. ES MUY INTERESANTE ESTA MATERIA. 

Ahora veremos algo parecldo, slgulendo la misma Idea de ahorrar el ttempo 
que se plerde buscando archives o programas en diskettes y cassettes. 

SL A VECES UNO NO SABE EN QUE LU6AR GRABO UN PR06RAMA Y HAY QUE 
EMPEZAR A PROBAR CON TODOS. 

En efecto, para muchos usuarlos de computadores, una de las tareas que mas 
tlempo consume es buscar entre los diskettes en cual estS un programa 
especlf Ico. Veremos un programa que te da una poslble solucl6n. 

HUM iSERA ALGO COMO UN INDICE? 

Exactol. iAcaso no seria fant^stico tener un indlce de todos tus diskettes, 
almacenado en otro diskette? 

ISENSACIONAL! DE ESA FORMA NUNCA HABRIA QUE ESTAR CAMBIANDO DISCOS. 

Y con algunas pocas facllldades, como capacldad de bOsqueda e lmpresl6n, 
tendrlas un utilitario verdaderamente "utU", 

BUENO, PERO EN REALIDAD HAY HARTOS SISTEMAS DE CATAL06ACI0N DE 
DISCOS. 

El problema de la mayoria de el los es que hacen mucho m^s de lo que 
realmente se neceslta y eso hace que sean m^s compllcados. 

SEA QUE ES UN PROGRAMA BIEN SIMPLE ENTONCES. 

El programa "Utilitario de Catalogacl6n de Discos" (UCD) es simplemente un 
directorlo maslvo, crea archtvos separados de todos los directorlos de tus 
discos, en un disco deslgnado para el lo. 

iYQUESlGNIFICAESO? 

Esto slgnlflca que puedes obtener un directorlo de cualquler disco sin tener 
que recurrlr al DOS y camblar diskettes. 
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SI. EN REALIDAD ES UTIL, 

Otras tres caracteristlcas hacen que UCD sea aCin mas util, Prlmero, tienes la 
opci6n de hacer un dlsco-dlrectorlo de todos tus discos, uno solo, o todos los 
discos en un clerto rango. Segundo, UCD utlllza totalmente lo que se conoce 
como "Comodln de Atari" (Atari's wild card) 

>J A 0131 ^m C'J.^AU: T 0¥&Ji 
iCOMODlN? iCOMO EN LOS N AIRES? 

En concepto, si. Se trata de un slmbolo que puedes poner en el nombre de un 
programa y te permlte ver todos los programas que tienen el string 
espec i f i cado en su nombre. 

COMO QUE TE ENREDASTE UN POCO CON LA EXPLICACION. 

Mas f^cil un ejemplo. Si quieres ver todos los arctiivos que tengan la 
terminaci6n. LST escribes * LST y te muestra la lista de programas que tienen 
esa terminacibn. 

ME HUBIERAS DICHO QUE SE TRATABA DEL ASTERISCO Y LISTO, 1 

Ifi 

Bueno, el asteristico es el "comodin" mas conocido pero tCi puedes elegir uno 

particular cuando uses UCD. . .: 

IQUE SIMPATICO! 

Una espec ificacl6n de archivo no tiene porque tener un comodin. Si tu sabes 
exactamente que programa o archivo estas buscando, escribe su nombre tal 
cual y UCD Identlf lea todos los discos que tienen ese nombre, 

■■>-' . •!*.! dvv ssasi ' 

YA, 6Y CUAL ES LA TERCERA CARACTERISTICA? 

Para aquellos que poseen impresora, UCD tambien entrega una "copia dura" del 
Indice de los directorios, 

HAY QUE SER 61 EN ORDENADO CON LOS DISCOS PARA QUE RESULTE ESTE 
SISTEMA. 

Asi es. Prlmero debes numerar todos tus discos comenzando con el I y poner 
este nOmero en su etiqueta. 
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YA, LO VOY A HACER EN SEGUI DA 

Luego ejecuta el programa. Lo primero que te plde es que elljas el simbolo 
"comodln". SI presionas RETURN, UCD usarci autom^tlcamente el asterisco 
como comodin. ^ > - - • 

BUENO, Y CUANDO EMPIEZO A CATALOGAR LOS DISCOS? 

En este punto, estas listo para hacerlo. Corre el UCD y escribe "C" para 
catalogar. El programa te pregunta que disco quleres catalogar. 

A LO QUE DEBO RESPONDER CON EL NUMERO DEL DISKETTE. 

luego RETURN y tienes que insertar el diskette correspondiente y volver a 
presionar RETURN, UCD leera el directorio del disco, Luego inserta el disco de 

datOS, ■ • ■:'•<'■.■ ■^■' ■-■'■ •' ; ,":> V - 

iCUAL ES ESE? " i ' 

Es el disco con el programa UCD y todos los archivos creados con el UCD. 
Bueno, ibamos en que insertabas este disco, luego RETURN y UCD grabara el 
directorio del disco que habia leido antes. Lo graba como un nuevo archivo que 
se Uamar^ " DISCO n" donde n corresponde al numero del diskette que pusiste. 

SEA QUE SI PONGO EL DISKETTE m 1 GRABA UN ARCHIVO QUE SE LLAMARA 
DISCO 1. 

Por eso es que tienes que asegurarte de escribir el numero correcto cuando 
est^s catalogando. x 

Tienes que seguir este mlsmo procedimiento para todos tus diskettes. 

Y DESPUES SUPONGO QUE PUEDO VER UN DIRECTORIO DE TODOS LOS 
DIRECTORIOS. 

■ ■ ■ ■ ■ \f 

Para obtener un directorio completo, escribe "D" y te aparecer^n varias 
opclones: !-:';v -■•■-,.'■'" ^ :"'■■': '--■■. -"■ ■•■■ 

- si tienes una impresora y quleres un listado de tus directorios, escribe S 
cuando te aparezca la pregunta si es que quleres un listado. 
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SI NO TENGO IMPRESORA, LA UNICA OPCION QUE ME QUEDA ES UNA N iVERDAD? 

Si, pero tienes otras opclones. Por ejemplo, tlenes la opcJ6n de buscar dentro 
de un rango determlnado de discos. Escribe S si quleres un range. 

A VER SI TE ENTIENDO. SI ESCRIBO S Y LUEGO 3,8 EL PROGRAMA BUSCARA 
ENTRE LOS DIRECTORIOS 3, A, 5, 6, 7 Y 8. 

Exacto. Y si quleres que UCD comlence con el disco I y continue hasta que no 
encuentre m^s archlvos, slmplemente preslona RETURN. 

iHAY MAS OPCIONES? ■ - ? ; ^ •" v . 

Claro. Tambl^n puedes especlf Icar e) nombre del archlvo que est^s buscando. 

AH! LO PODRIA HACER USANDO EL COMODIN QUE VIMOS RECIEN. , 

Y UCD te responde mostrando cada numero del disco seguido de todos los 
archlvos que cumplen con la especlf icaci6n que tu dlste. 

iYAL FINAL? 

Cuando UCD ha buscado a traves de todos los dlrectorios, o ha termlnado en un 
rango especlflco, muestra el numero de archives que ha encontrado y te 
devuelve a la pantalla principal. Aqui tienes el programa, 

UTII ITARIO DE CA TAI QGACIQN DE DISKETTES. (UCD). 

REM SAVE "D:UTCATDIS" 

10 GRAPHICS 0:SETCaOR 2,12.4:SETCa0R 1,0,15 

12 DIM D(1000).ESPEC$(17).F$(17).FN|(15) 

14 DSK-1 —^ 

15 OPEN •1.4.0,-K:" 

1 7 ? "UTIL1T.PARA CATAL06ACI0N DE DISKETTES" 

18 ? -SIMBaO C0M0DIN?";6ET 'I.COilF CO-ISS THEN CO-ASCC»") 

19 FOR l-I TO 38:? CHR$(C0);1«XT I 

20 aOSE *2:? CHR$( 125);? "UTIL. DE CATAL06ACI0N DE DISKETTESIUCDI ":? :? "ICJ 
CATAL06AR DISKETTE":? 

22 ? -ID] DIRECTORIO COMPLETO" 

40 POSITION 2,22:? "TU ELECCI0N->-;K5£T 'LK 

45 IF CHR$(K) <>"C" AND CHR|(K) o'O" THEN ? CHR$(I25);CHR$(253);"0 o C-.60T0 40 

50 IF CHR$(K)-'C" THEN 3000 

60 raM»»FUNCIONDEDIRECT0RIO 

65 ? CHR|(125),-CHR${29);-lUCDJ)IRECT0RI0-.fLS-0:S£TCa0R 2.15,4 
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70 ? 'INSERTE DISKETTE DE DATOS. <RETl«N>-:6ET * 1 ,K ;60T0 80 

75 ? "SALIDA POR IMPRESORA(S/N) ";:6ET *1JC:IF CHR$(KKS" THEN FLAG-1«0T0 80 

77 FLAG-O 

80 ? "QUIERES ESPECIFICAR RAN60(S/N)':SET *1.K:IF CHR$(K)--S- THEN ? 'RAN60';:INPUT 
PPI0,FIN:60T0 100 

90 PPI0-l:FIN-99999 . 

100 ? "ARCHIVO DESEAOO-;:INPUT ESPECt 

105 IF ESPECI-" " THEN ESPEC$(1KHR$(C0)fSPECt(2)-".":ESPECt(3)- CHR$(CO) 

110 F|-ESPEC|fSPECj(1,2K ": ESPEC$(3Ht:Ft-- ' 

120 FOR OSK-PPIO TO FIN 

130 FN$-"0:DISC0":FN|(7)-STRJ(DSK) 

140 TRAP 605:0PEN •2,4,0,FN»:? "DISCO ";OSK:TRAP 605:IF FLAG THEN LPRINT "DISCO "iDSK 

150 INPUT •2; F$;l-3 

1 52 REM » • BUSQUEOA Y COMPARACION DE ARCHI VOS 

155 IFF$(U)<>-"ANDF$(I.I)<>"»"THEN600 

160 IF ASC(ESPEC$(I,I))-COTHENH+1:GOT0 500 

170 IF ESPEC$(I.IK." THEN 500 

180 IF ESPEC$(I,I) <> F$(l,l) THEN 150 

200 IF l<LEN{ESPEC$) THEN 1-1+ 1 :60T0 160 

210 FLS-FLS+ 1 ;? FMF FLAG THEN LPRINT F$ 

215 GOTO 150 

500 H+l:L-LEN(F*)-6 

510 IF ASC(ESPEC*(I,I)K0THEN210 

520 IF ESPEC$(I,I) <>F$(L,L) THEN 150 

530 IF l<LEN(ESP£C») THEN 1-1+ 1 :L-L+ 1 :60 TO 510 

540 FLS-FLS+ 1 :? FMF FLAG THEN LPRINT F$ 

542 GOTO 150 

600 ?F$:CLOS£ •2:NEXTDSK 

605 ? :? FLS;" ARCHIVOCS) ENCONTRADO(S) •:IF FLAG THEN LPRINT IPRINT FLS;" ARCHIVO(S) 

ENCONTRADO(S) " 

606 FOR P-1 TO 500:NEXT P 
610 G0T020 

2999 REM»»FUNCI0NDECATAL06ACI0N 

3000 ? CHR$(125):SETCa0R 2.1,4:SETC0L0R 1,0,15;? "CATALOGOIUCD]":? :? "NRO DEL DISCO 
A CATALOGAR";:INPUT DSK 

3015 FN$--0:DISCO":FN|(7)-STR$(DSI«;) 

3020 ? :? "INSERTA DISCO 'J)SK;:? " <RETURN> 'M^ 'U 

3045 OPEN *2,6,0, •D;».»":l-0 

3050 TRAP 3500:6ET ♦2,K . \ 

3052 D(IK:H+1:60T0 3050 

3500 D(l+1H);aOSE ♦2;PRINT :? "INSERTA DISKETTE DE DAT0S-LUE60 RETURN-:6ET 'UiOPEN 

*2.8.0/N$:l-0 

3505 TRAP SeOO-TOINT CHR$(D(I));;PUT *2,D(I):I-I+1 

3510 IF D(IH) THEN 3600 

3515 GOTO 3505 

3600 ? 'CATAL06ACI0N FINALIZADA":CLOSE *2:60T0 20 

ME ENCANTO ESTE PR06RAMA. LO ENCUENTRO SUPER UTIL. EN REAL I DAD ES UNA 
GRAN PERDIDA DE TIEMPO ESTAR PONIENDO UN DISKETTE TRAS OTRO PARA VER 
SU DIRECTORIO. LO UNICO MALO ES QUE EL DIRECTORIO NO TE MUESTRA NUCHA 
INFORMACION, PERO IBUENO! NO HAY QUE SER TAN EXIGENTS. 
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iTAN COMPLICADO PARA UN PROBLEMA QUE PARECE TAN SIMPLE?. 

Lo que pasa es que aclem;&s te soluclonar^ muchos otros problemas, Revtsemos 
algunos conceptos del DOS prlmero. 

Como debes saber, el DOS de Atari accesa los discos por sectores; uno a la 
vez. Sin embargo, esto tambl^n puede hacerse en forma independlente, sin 
usar DOS, modlflcando clertos punteros en la seccl6n de memorla conoclda 
como "bloque de control de disco" (DCB, DISK CONTROL BLOCK) y Uamando al 
SIstema Operatlvo (OS, OPERATING SYSTEM), para que haga el resto del 
trabajo. 

PERO 



Lo slento, no hay preguntas entre medio. Deja explicarte todo bien y despu^s 
me preguntas lo que quieras. 6Ya?. 

SI NO HAY OTRA ALTERNATI VA. 



Bueno, DCB y OS no necesltan que est^ cargado el DOS en este m^todo. FIJate 

despu^s en las llneas 8010 y 8100 del programa, 

Esa es la subrutlna para accesar dlrectamente el disco. Ahora te explico como 

func I ona el programa. =^- '--^ ' 

Prlmero necesltamos def Inir un Srea "buffer" para que guarde el contenldo del 

sector del disco que leemos o para que guarde alguna Informaclon que deber^ 

grabarse en el disco 6est^ claro?. ■ 

HAST A AOUl VAMOS BIEN. ENTIENDO QUE TENGO QUE RESERVAR UN AREA 
AUXILIAR EN LA MEMORIA QUE GUARDA LO QUE SE LEYO EN EL DISKETTE LO 
QUE TENGO QUE ESCRI Bl R EN EL. 

Correcto. Este buffer deber^ tener 128 bytes de longltud ya que cada sector 

del diskette tiene 1 28 bytes. Para esto usamos BUF$ en el programa. 

Como te dlje antes, la Hnea 8010 identlfica el comlenzo del DCB que ocupa las 

direcclones de memorla 768-779. Haclendo un POKE con valor 1 al segundo 

byte (BLK ♦ 1) se especlfica acceso al drive 1. La variable FUN de la llnea 

8020 guarda el nQmero de la funcl6n para la rutlna de acceso al disco; 82 

slgnlf lea un comando de lectura del sector y 87 es un comando de escrltura al 

disco. 

Para poder leer lo que tIene el area buffer, o blen escrlblr en esta area, la 

dlreccl6n de este buffer debe ubicarse en BLK + 4 y BLK + 5 en f ormato "byte 
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menor/byte mayor" (lowbyte/hlghbyte). 

PERDONA QUE TE INTERRUMPA, PERO MEJOR ME EXPLICAS ESQ SI NO NO 
ENTENDERE ABSOLUT AMENTE NADA DE AQUI EN ADELANTE. 

Lo anterior signlfica que BLK + 5 contendr^ la parte superior de la d1recc16n, 
el nCimero de veces que cabe 256 en la direcclon. Esto se expresa como INT 
(ADR (BUF$) /256. 

BLK + 4 contendr^ la parte Inferior de la dlreccl6n, el resto de la d1vlsi6n por 
256, dada por; ADR(BUF$) - 256 (parte superior). Este formato de direccldn 
low byte / high byte es standard en el Atari y otros mlcrocomputadores 
basados en el mlcroprocesador 6502. 

Luego, el nCimero del sector que debe ser accesado debe expresarse en este 
mismo formato low/high y se ubica en BLK + 10 y BLK + 1 1. Los sectores se 
enumeran desde 1 a 720. Algunos de estos sectores se usan para el directorlo 
y otras cosas, por lo que el DOS mostrar^ solo 707 sectores disponlbles en un 
diskette vacio, aunque tu puedes accesar todos los sectores con este 
programa. 

iOUE FRESCURA LA DEL DOS! SE QUEDA CON 13 SECTORES EN CADA UNO DE MIS 
DISCOS. ' 

Bueno, ya es hora de llamar al SIstema Operatlvo. La subrutlna que escribe el 
contenldo del buffer en un sector del disco especiflco y que escribe el 
contenldo del sector en el buffer se local iza en la direcclon hexadecimal 
$E453 (decimal 58451), Para llamar a esta subrutina necesltas hacer un 
pequeno programlta en lenguaje de maqulna. La Iinea 8080 Inicia este 
programa que las llneas 205 y 210 ponen en DSKINV$. Despues de volver, si 
hubo algOn problema al leer o escrlblr un sector, se coloca un c6d1go de error 
en BLK + 3, el valor 1 Indica que no hubo ningun error. La Iinea 8080 adem^s 
pone este c6d1go en la variable NR para usarlo en las llneas 8086 y 8090. 

IT ANT AS VARI ABLESI ESPERO QUE NO SE ME CONFUNDAN. 

No te preocupes, despues te dare una lista de todas las variables y su 
signlficado. Ahora que ya sabes como se lleva a efecto el acceso directo al 
disco, veamos el programa principal. Cuando hayas escrito el programa, 
gr^balo en un disco que tenga diferentes archlvos del DOS, como el 
AUTORUN.SYS, el DOS.SYS, DUP.SYS, algun programa de LIST/ENTER y otros de 
SAVE/LOAD, que sera muy Interesante revlsarlos. 
Cuando corras el programa te aparecerS un menu. Preslona el bot6n SELECT y 
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si todo va blen, podr^s cambiar el fondo de la pantalla de azul a verde (o azul 

y azul oscuro, dependlendo de tu televisor). Cuando la pantalla est# verde (o 

azul oscuro) puedes Imprlmlr todo lo que aparece en el la, asumlendo que 

tienes una Impresora conectada. En cualquler punto de la ejecuc16n del 

programa, puedes pasar del modo de tmpresl6n al de no - Impresl6n y vice 

versa, 

Seleccionemos una pantalla de no-lmpresJ6n por ahora. Las opclones son: 

t .- Revisar un sector 

2- Revisar un sector del directorlo 

3- Rastreo sector por sector 

4.- Revisar un bloque de sectores 

5- hapa de utilizacion del disco 

6 - Tabia de sectores utilizados 

7.- Copiarun sector 

8- Respaldar el directorlo 

9.- Proteger / desproleger sectores 

to- Revisar la memoria. 

Escoge la opci6n 2 y presiona RETURN. Esta opci6n te permite revisar el 
contenido de un sector en forma especial, el programa asume que est^s 
buscando uno de los sectores entre el 361 y 368 y te mostrara los datos de 
acuerdo a esto. Cuando te pide el numero del sector escribe 361, para revisar 
el primer sector del directorlo, Escuchar^s un "beep" mientras se lee el sector 
y luego los bytes en el sector se despliegan en la pantalla como caracteres. 
Los sectores del directorlo est^n organizados en grupos de 16 bytes y cada 
grupo contiene informacl6n de uno de los archivos que aparece en el directorlo 
del DOS. DOS se refiere a los programas y archivos a trav^s de numeros, 
comenzando desde y con un m^xlmo de 64 archivos. 

EL ULTIMO ARCHIVO TENDRIA ENTONCES EL NUMERO 63. iPOBRES ARCHIVOS! LOS 
TRATAN COMO A LOS PRESOS. 

La pantalla se divide en 8 lineas de 16 bytes cada una, asi cada directorlo 
aparece en una linea separada, Fijate en el primer byte de un directorlo tipico, 
Una B mayuscula indica un archivo normal listo para ser usado, De esta forma 
un primer byte igual a 66 (el valor AT ASCI I de B) le indica al DOS que ese 
archivo est^ bueno y operativo, Un archivo protegido tiene el bit 5 del primer 
byte en "ON" (valor 1), Si el bit 7 del primer byte est^ en "ON" DOS considera 
este archivo ellminado del directorlo, Ese espacio est^ entonces disponible y 
ser^ re-escrito por el pr6ximo archivo que se grabe. Si se borr6 un archivo con 
la opcidn D del DOS y no se han grabado nuevos archivos en el disco, el archivo 
puede recuperarse. 



80 COMPU ATARI 

iFANTASTICO! NO TENIA IDEA QUE SE PODIA HACER ESO. ME SI GO ASOMBRANDO 
CON Ml ATARI. lES UNA MARAVILLAI ME DA RABIA ACORDARME DE TODOS LOS 
PR06RAMAS QUE HE BORRADO POR EQUIVOCACION Y CREIA PERDIDOS PARA 

SIEMPRE, DE HABER SABIDO LOS HUBIESE RECUPERADO Y IBUENOI YA APRENDI 

YYANOMEPASARAMAS. 

Ya que te Interesd tanto esta parte, probemos con un ejempio, a ver si 
realmente Ingresaste el programa en forma correcta. Escribe algCin programa 
tonto, como 10 REM y gr^balo en diskette. Recurre al DOS y lista el directorlo. 
Ahora usa la opcl6n D para ellmlnar el programa. Un nuevo directorlo del disco 
te servir^ para verificar que tu programa no aparece, Vuelve al BASIC y carga 
el programa DESCUBRIDOR. EJecutalo y elige la opcl6n 2 nuevamente. Revisa el 
sector 361. St tienes muchios arcliivos en el disco, puede que tengas que 
revlsar m^s sectores, posiblemente hasta el 368, para ver el programa que 
borraste; preslonando RETURN un par de veces puedes volver al menu principal 
para selecclonar el pr6ximo sector. Repite esto hasta que encuentres tu 
programa y ver^s que aparece a pesar de que tu lo eliminaste, 
Presiona RETURN una vez m^s para que te aparezca el mensaje "CAMBIOS EN EL 
SECTOR?". ' / 

Responde S, luego escribe C en el pr6ximo mensaje, de manera que puedas 
agregar bytes dentro del sector en forma de caracteres y no de numeros. 
Escribe 1 para el numero de caracteres que quieres cambiar. Determina cual 
es el primer byte del programa que eliminaste para responder al siguiente 
mensaje. Este debe ser un coraz6n invertido (CHR$(128)) que indica el archivo 
ellmlnado. El numero del byte aparece al lado izquierdo de la pantalla. 
Escribe el numero del byte inicial. El programa te pedir^ el byte que quieres 
insertar. escribe una B, luego S para corroborar que si quieres hacer el 
cambio. Escucharas un sonldo en la diskettera cuando se est^ 
modlficando el sector del disco y luego un "beep" cuando se vuelve a leer y a 
desplegar en la pantalla. Tendria que aparecer la B como el primer byte de tu 
programa, lo que indica que lo recuperaste. Para verificarlo trata de cargarlo 
vuelve al DOS y mira un listado del directorlo. 

INO LO PUEDO CREER! ES MUCHO MAS SENCILLO DE LO QUE YO SUPONIA. 

Ah!, un detail e. Aunque ya puedes cargar y grabar tu programa, sus sectores no 
estan protegldos per el DOS. Esto signlf lea que si grabas un nuevo programa te 
puede quedar sobre el tuyo. Para protegerlo, gr^balo con un nombre nuevo y 
DOS marcar^ sus sectores como si estuviesen en uso. 
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TENGO UNA IDEA! PERO NO, NO CREO QUE SIRVA. 

Pero dlmela primero, ahf vemos. 

YO SE QUE SE PUEDE HACER, PERO NO SE SI CON ESTE PR06RAMA. ME HAN 
CONTADO Y LO HE VISTO EN ALGUNOS DISCOS, QUE UNO PUEDE DEJAR 
INVISIBLES ALGUNOS PR06RAMAS, SEA, EST AN EN EL DISCO PERO OTRA 
PERSONA NO LOS PUEDE VER EN EL DIRECTORIO, 

Por supuesto que sirve este programa. Es muy senclllo dejar Invisible un 

archlvo, 

Como puedes ver en el dlrectorio, el nombre de todos los archives tiene 2 

partes: el nombre propiamente tal y una extensl6n. Esta extensl6n no es m^s 

que los caracteres ubicados en los tres ultlmos espaclos disponlbles para el 

archlvo. Puedes cambiar los caracteres en el nombre de un archlvo con 

resultados muy Interesantes. 

lOTRO EJEIiPLOi iYA? ASI ME QUEDA MUCHO MAS CLARO. 

Bueno, ellge la opclon 2. Escoge N esta vez, para Insertar numeros. Escribe I 
para Insertar solo un numero. Usa nuevamente el programa "tonto" que usamos 
en el ejemplo anterior y elige uno de los bytes de su nombre para cambiar. 
Camblalo al valor 125, luego escribe 5 para modlflcar el sector. 

iPORQUE 125? 

El valor AT ASCI I 125 es el caracter para llmplar la pantalla (CLEAR SCREEN). 
SI vuelves al DOS y pides un directorlo del disco, cuando Uegues al nombre de 
tu programa, la pantalla quedar^ en bianco. 

No puedes cargar el programa con su nombre modlficado porque CHR$(125) no 
es un caracter legal en un nombre de archlvo. Sin embargo DOS no considera 
disponlbles estos sectores, estan protegldos y no puede escrlblrse nada en 
el los. Creaste, entonces, un archlvo que no puede ser cargado o ejecutado sin 
modlflcar su nombre. Con una elecci6n aproplada de los caracteres de control 
(por ejemplo CTRL <— ), puedes nombrar un archlvo y hacer que nl slqulera 
aparezcaen lallsta, 

MIra, aqui tienes otro ejemplo para probar. Haz otro programa cortlto y 
grabalo como el primer programa en un diskette vacio. Luego graba otros 
programas con otros nombres. Ejecuta el programa "DESCUBRIDOR", usa la 
opcl6n 2 para revlsar el sector 361 y usa la opcl6n de camblo con Insercl6n de 
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numeros ocho veces para Insertar los slgulentes numeros al princlpio del area 
de entrada de tu programa (comienza al prlncipto, no en el nombre); 65, 1, 0, 4, 
0, 88, 156, 155. Luego cambla los ocho bytes restantes de ese directorio por 
espacios. Puedes usar la opcl6n de lnsercl6n de numeros, con Insercl6n de 
bytes mCiltiples, ya que son todos el mlsmo nCimero. El nCimero 32 representa 
el caracter AT ASCII del espacjo en bianco. 

Vuelve al DOS. Llsta el directorio; no aparece nada. Todavla puedes cargar, 
ejecutar y grabar los programas en forma normal, pero solo si conoces sus 
nombres correctamente. 

IQUE ENTRETENIDO! TODO EL MUNDO ALEGA QUE LOS MICROCOMPUT ADORES NO 
TRAEN BUENAS FUNCIONES DE PROTECCION Y COSAS ASI, PERO CON TODAS 
EST AS POSIBILIDADES EL QUE NO PROTEGE SUS PROGRAMAS ES PORQUE NO 
QUI ERE, 

Asi es, Y ya vez que no es demaslado compllcado, 

SABES, ME QUEDO UNA DUDA CUANDO MODIFICAMOS EL NOMBRE DEL PROGRAMA 

Y LE METIMOS UN CARACTER PARA BORRAR LA PANT ALL A DENTRO DEL NOMBRE 
6TEACUERDAS? 

SI. ICu^] es tu duda? 

CUANDO LO LISTO CON D.O.S. SE LIMPIA LA PANTALLA PERO EN EL DESPLIEGUE 
POR PANT ALLA APARECE UNA FLECHA. 

Exlste un POKE para hacer que el computador despllegue caracteres de 
comandos en vez de ejecutar los comandos. Ese POKE lo encuentras en la linea 
1047 (POKE 766,1). POKE 766,0 te devuelve al modo normal. Prueba POKE 
766, 1 en modo dlrecto y trata de editar la pantalla con las f lechas de control. 
Con la opci6n 2 adem^s se puede ver m^s informac)6n de un archlvo. Entre el 
primer byte y el primer byte del nombre hay 4 bytes que contlenen el numero 
del primer sector del archlvo y la longitud de este en sectores. Esta 
informacidn esta almacenada en el formato low/high que vimos hace un rata 
Con la opcl6n 2, la interpretac16n de estos bytes se despliega al lado derecho 
de la pantalla. 

Y TODAS LAS OTRAS OPCIONES DEL PROGRAMA iNUNCA SE OCUPAN? 
Entreteng^monos un poco con las otras opciones, Examlna el sector del 
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dlrectorto que contlene el archive DUP.SYS, el DISK UTILITIES PACKAGE 
(Paquete de utUitarlos de disco) y f i jate en que sector comienza. Ahora vuelve 
al menu principal y escoge la opcl6n 1. Escoge el sector donde comienza 
DUP.SYS. Ingresa la opcidn de despliegue en caracteres y ver^s el primer 
sector de DUP.SYS desplegado en forma de caracteres. En alguna parte en ese 
sector ver^s el mensaje que aparece en la parte superior de la pantalla cuando 
pones el DOS. Con la opci6n de camblo de sectores puedes poner tu propio 
mensaje y asi cada vez que pongas el DOS se desplegar^. 

AH! LE PUEDO PONER Ml NOMBRE Y ASI SI AL6UIEN ME LO COPIA LO PILLO. 
TAMBIEN PUEDO PONERLE ALGUNA EXPLICACiON UN NOMBRE SIMPATICO. 

Fijate ademSs que el computador emite un ruido (beep) varias veces durante el 
despliegue. Esto ocurre porque hay varies bytes en el archivo que tienen valor 
1 55, el c6digo de la tecla RETURN preslonada. 

BUENO, LO PUEDO ELIMINAR CON EL POKE QUE USAM05 RECIEN, 

No, esto no tiene representacion en caracteres, ni siqulera con el POKE 766,1 
asi que normalmente rompe la imagen en la pantalla con saltos de llnea, 

iY NO SE PUEDE EVITAR? 

Para evitar esto, el programa los detecta, hace sonar el "beep" para que tu 
sepas que existen y pone un asterisco en inverse en la pantalla para mostrar 
su ubicaci6n. Esto lo hace la llnea 1067. 

Cada sector en el disco tiene 128 bytes de largo. Sin embargo, si el sector fue 
Uenado con el Atari DOS, solo quedan disponlbles 125 bytes para dates. 

lYA EST A EL FRESCO DEL DOS OCUPANDO MIS SECTORES! 
iQUE PASO CON LOS OTROS TRES REST ANTES? 

Los etros 3 bytes contlenen informacl6n "dom^stica". El byte 126 tiene en 6 
de sus bits, el numero del archivo con el cual se asocla el sector. En los otres 
dos bits del byte 126 y en los 8 bits del byte 127 est^ el pr6xlmo puntero. 

LEI PROXIMO PUNTERO? SI NO TIENE QUE VER CON FUTBOL, NO TENGO IDEA DE 
LO QUE ME EST AS HABLANDO. 

El pr6xlmo puntero es un indlcador. En este case indica el prdxlmo sector de 
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ese archive especifico del DOS. Lo que pasa es que todos los sectores 

asoclados a un clerto archive del DOS ho tienen porque estar contlguos, uno al 

lado del otro, en el disco, Por eso necesltamos un puntero que nos Indlque cual 

es el pr6xlmo sector. 

El byte 128 tiene un contador de la cantldad de bytes sin uso que quedan en el 

sector. 

iY COMO PUEDEN QUEDAR BYTES SIN USO EN UN SECTOR? 

Por ejemplo, si ese sector es el ultimo de un archlvo, puede que no est6 lleno. 
DOS neceslta saber cuantos bytes estan en desuso para no cargar esta parte 
del sector a la memoria principal como parte del archlvo. 

BUENO, EN REALIDAD ESTA INFORMACION ES BIEN UTIL. POR ESTA VEZ CREO QUE 
EL DOS TIENE RAZON DE OCUPARLOS. 

La opclon 3 del Menu principal permite rastrear automatlcamente a traves de 
un archlvo de DOS sector por sector, sigulendo los punteros. Encuentra el 
sector Inlclal del archivo DUP.SYS. Escoge esta opclon con su primer sector 
como el Inlclal, Ahora te aparece un menu con dos opciones; auto trace y 
pausa. 

6Y DE QUE SE TRATAN? 

Pausa Indica que el computador esperar^ que preslones una tecla despues que 
se despliega cada sector, para seguir con el sigulente. Auto trace te permite 
recorrer los sectores uno tras otro hasta el final del archlvo. 

BUENO, PERO SI6AM0S CON EL EJEMPLO. 

Ya. Escoge la opcibn de pausa. Luego escoge despliegue en forma de caracteres. 
Veras los sectores del archlvo DUP.SYS que se despllegan suceslvamente. 
Parte de la informacl6n, como el menu del DOS ser^ I legible. La opclon Trace 
(rastreo) tambl^n se puede usar para revlsar programas almacenados. 

iY ES LEGIBLE UN PROGRAMA DE ESTA FORMA? 

SI un programa ha sldo salvado (SAVE), la mayor parte de ^1 luclr^ como 
garabatos. Sin embargo, si un programa fue llstado (LIST) al disco, ser^ 
poslble leerlo ya que todavia est^ en caracteres AT ASCII. 
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A! mirar un programa llstado ver^s las lineas de programa corrlentes, 
seguldas de un "beep" y un asterisco en Inversa. 

JAH! ESE ASTERISCO CORRESPONDE AL RETURN QUE 5E PRESIONA DESPUES DE 
CADALINEA, 

La Opc16n 6 te entrega una tabla de todos los sectores utlllzados por un 
archive dado, st tu le das el sector Iniclal. Con esta opcl6n te dar^s cuenta que 
en muchos casos los sectores no son contlguos. 

VAMOS MAS LENTO. TE SALTASTE LA OPCION 4 

La Opc16n 4 es muy similar a la 3, Se usa para revlsar un bloque de sectores 
contlguos, ingresando el sector Iniclal y el numero de sectores que quieres 
ver. Esta opci6n no slgue el m^todo "encadenado" del trace, ignora por 
completo los punteros. 

AHORA NOS TOCA LA OPCION 5, - ■ - 

Como todos los sectores creados con DOS contienen el numero de la pos1c16n 
que ocupan en el directorlo es posible hacer un mapa del disco, marcando cada 
sector con el archlvo al cual est^ encadenado, Y esto es exactamente lo que 
hace la opclon 5. 
Ejecutala, con un disco que tenga muchos archives y haya sido muy usado 

cargando y regrabando estos archlvos. Toma solo unos pocos minutos el 

mapeo de los 720 sectores. Si tienes una Impresora seguramente te interesarS 
cambiar al modo de impreslon para tener una copia del mapa para referenclas 
futuras, 

SABES? SE ME OCURRE QUE NO ES MUY VENTAJOSO TENER UN PROGRAMA TAN 
SEPARADO EN EL DISCO, SE DEBE PERDER TIEMPO EN JUNTAR TODOS LOS 
SECTORES PARA CAR6AR UN PROGRAMA, <!,N0 SE PUEDEN JUNTAR TODOS LOS 
SECTORES QUE CORRESPONDEN A UN MISMO PROGRAMA? 

Claro que si. Ve^mos un ejemplo. Supongamos que escribiste tres programas 
A, B y C en ese orden, Estan almacenados en forma secuenclal en el disco, con 
10 sectores por programa, Luego modlficas el programa A, agreg^ndole 
algunas lineas con lo que ocuparia 15 sectores, Al salvarlo, el DOS sigue 
usando los 10 sectores del princlpio pero ahora necesita 5 m^s, los tiene que 
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dejar despu^s del programa C, Ahora el mapa del disco serla A-B-C-A, 

Luego puedes modlflcar el programa C y tendrjas A-B-C-A-C y asi 

sucesjvamente. 

iVERDAD QUE SB PONE MAS LENTO? 

Y mas que eso es mucho mas facll que ocurran errores con los comandos LOAD 
y SAVE. 

SI Duplicamos el disco igual sigue con la misma organizaci6n, pero usando la 
opcl6n COPY del DOS, con nombre de archives *.* los sectores de un mismo 
programa quedar^n contiguos en el disco, lo que lo hace mucho m^s conf iable. 

CON TANTOS SECTORES DISPERSOS iCOMO SABE EL DOS QUE SECTORES EST AN 
EN USO Y NO PUEDEN UTILIZARSE? 

DOS mantlene un mapa de los sectores del disco, que se actual Iza despu^s de 
cualquier modificacion. Este mapa lo guarda en el sector 360. Por esto el 
sector 360 es un sector especial reservadO que se crea cuando formateas un 
disco. 

iY POR QUE EL 360? 

Se escogid el 360 ya que est^ cerca de la mitad del disco y por esto tiene un 
tiempo promedio de acceso menor. Esto es muy importante, ya que se accesa 
durante cada operaci6n de grabacl6n. 

Ejecuta la opci6n 1 del Menu Principal, Escribe 360 para el sector. Escoge la 
opci6n 4, que solo aparece cuando eliges el sector 360, un mapa hexadecimal 
del sector 360. Despu^s de un momento veras el contenido del sector 360 
desplegado en hexadecimal. Probablemente la mayoria ser^n F's y O's. 

iY QUE SIGNIFICA ESTO? 

El cero indica los sectores en uso. Cada indica 4 sectores en uso. 

NO ENTIENDO MUCHO. 6P0R QUE 4 SECTORES? 

Recordemos un poco los nCimeros binarlos y hexadecimales. Cada conjunto de 2 
digitos hexadecimales representa un byte. Un byte son 8 bits, por eso dos 
digitos hexadecimales representan 8 sectores en el mapa. F es el digito 
hexadecimal de 15, que en blnario es 1 1 ) 1. Los sectores llbres en un disco se 
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muestran como I 's, por eso FF Indica 8 sectores disponlbles. 

AHORA SI ENTENDI. <LY QUE PASA CON LOS OTROS CARACTERES 
HEXADECIMALES? . 

C en hexadecimal es un 12 en decimal, lo que en binarlo es 1 100. Por eso una C 
en el mapa indica 2 sectores disponlbles, seguldos por 2 sectores en uso. Los 
sectores en uso estan protegldos. Esta protecci6n puede hacerse con DOS o con 
algun otro m^todo, por ejempio con el programa "DESCUBRIDOR". De esta forma 
puedes reservar espacio en el disco que Jam^s ser^ ocupado por el DOS. 

ES UN POCO COMPLICADO EL MAPA DE LOS SECTORES. UNO NUNCA UTILIZA LOS 
NUMEROS HEXADECIMALES. 

Como ayuda, los numeros declmales que muestran qu^ sector se representa 
por el ultimo bit del ultimo numero en esa llnea, se listan al lado derecho de 
lapantalla. 

BUENO. AHORA ME GUSTARIA VER EL PROGRAMA. 

Primero, como ya te lo habia dicho, te dar^ una llsta con todas las variables 
que usa el programa, que son bastantes. .r. „-. 

I ISTA DF VARI AR i FS OF! "DFSCURRIDQR" 

BITS Tabia de busqueda de numeros declmales con sets de bits sucesivos. 

BLA$ String de blancos para borrar textos de la pantalla. 

BUF$ Area buffer usada para almacenar 1nformaci6n leida de un sector, o 

informaci6n que tiene que ser grabada en un sector. 
DSKINVS Llama a la subrutina OS para acceso al disco. (Sistema Operativo). 
6$ Guarda una S o N para las respuestas. 

H$ Almacena el contenido de BUF$ despu^s de la convers16n hexadecimal. 
HEX$ TabIa de busqueda de digitos hexadecimales para conversibn. 
KNOTS Rutina en lenguaje de m^quina para negar (NOT) un numero. 
ND$ Hace un AND l6gico entre dos nOmeros. 
OARS Hace un OR Idgico entre dos nCimeros. 

VBS Rutlna en lenguaje de m^quina para inicializar la rutina vertical con 
blancos. 

AP Decision de Auto Trace Pausa. 
B Variable temporal para leer datos a strings. 
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BIT ValorATASCIIcleBIT$(BITriOD). 

BITMOD Indlce de BITS. 

BLK Comlenzo del bloque de control del disco en memoria 

BN Bytes del mismo numero que se tienen que Insertar en BUF$ 

CN Numero de caracteres que se tienen que insertar en BUF$ 

FN NCimero del archlvo de los datos del sector 

FP Puntero al prdximo sector del archivo. 

FUN Numero de la funci6n para la rutina de acceso al disco. 

H Valor AT ASCI I de los caracteres de BUF$ para convertir a 

hexadecimal. 

HH Byte mayor de H 

H Byte menor de H. 

I Variable de indice de loops. 

J Almacenam lento temporal e indice de loops. 

K Byte desde la pantalla en la rutina de vaciado a la impresora. 

LK Variable de elecci6n para opciones de protecci6n/desprotecci6n 

(lock/unlock), 

M Almacenam lento temporal de valores PEEK, 

MEM Puntero a bloques de memoria, 

N Variable indice a H$ 

NB Valor del nuevo byte a insertar en BUF$ 

NFRE Numero de sectores disponibles desde el Sector 360. 

NFREH Byte mayor de NFRE 

NFREL Byte menor de NFRE 

NR Numero del error en lectura de sectores. 

NSL NOmero de sectores para proteger/desproteger 

NUM NOmero de bloques o sectores para revisar 

P Byte desde el teclado para continuar. 

PK Variable para almacenamiento temporal de valores PEEK. 

Q Para usar con funciones USR 

RSLT Resu 1 tado de subrut i na de operac i ones 1 6g I cas 

SEC Sector a accesar. 

SECHI Byte mayor de SEC 

SECLO Byte menor de SEC. 

SS Sector Inicial para operaciones 

SSH Byte mayor de SS. 

SSL Byte menor de SS 

TY Tlpode vaciado requerido (impresora -pantalla). 

WH Opcl6n en el Menu principal 
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USTAD E SUBRUTINA$ 

100-260 Intcializadon 

300-770 tlenO principal y submenus. 

660-670 Revisar la memoria en vez del disco. 

780- 1 000 Manejo de algunas opciones de menu . 

1 040- 1 1 05 Vaciado de caracteres . 

II 06- 11 60 Cambio de un sector . 

1200 Borraeltexto. 

1 400- 1 440 Opci6n de copia de un sector , 

1 600- 1 640 Opcion de respaldo del directorio . 

1700-1799 Proteger y desproteger sectores del bit map y actuallzar el 

contador de sectores disponibles> 

1 800- 1 840 Opciones de mapeo de archivo. 

20 1 0-2200 Opcion de mapeo de sectores encadenados . 

3000-3060 Vaciado de la pantalla a la Impresora. 

4040-4060 Conversion hexadecimal. 

4205-4240 Vaciado hexadecimal . 

5015-5060 Vaciado decimal 

7010-7100 Determtna numero del archivo y al proximo puntero. 

8010-8100 Lee/escribe un sector del archivo. 

PROGRAMA-DESCUBRIDQR" 

Precauci6n; El mal uso de este programa puede destruir programas de gran 
valor. Pop favor lee culdadosamente las instrucciones de las paginas 
anterlores antes de usarlo. 






REM SAVE -DiDESaCRE" 


100 


REM '"' PROGRAMA DESCUBRIDOR »» 


105 


CLOSE ♦2;0PEN •2,4,0.-K:" 


107 


CLOSE •4:0PEN *4,!2.0."S:" 


109 


POKE 766,0 


200 


DIM BUF$(130),DSKINVt(10).6t(1),NDt(12).HEXi(16).H$(1 155), 




BLA|(38).VB$( 1 1 ),B1T$(8).0AR$( 1 2),KN0T$( 1 2) 


203 


HEX J-"0 1 23456789ABCDEF" 


204 


BLA*-" 


205 


DATA 104,32,83,228,96 


210 


RESTORE 205 


211 


FOR 1-1 TO 5 


212 


READ B©SKINV$(I)-CHR$(B) 


213 


NEXTI 


215 


DATA 104,104.104,133.209.104,104,37,209,133,209,96 


220 


RESTORE 215 


221 


FOR 1-1 TO 12 


222 


READ B:N0$(l, IKHRt(B) 


223 


NEXT 1 


225 


0AR|-N0$:0AR$(8KHR$(5) 


226 


KN0Tt-N0$:KN0T$(6KHR*(69) 
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230 DATA 72.169,8,141.31,208.l73.3f,208.20l,5,208.8.»73,255.6, 
73,255,141,255,6 

231 DATA 173,255,6,201.255.240,7,169,148,141,198,2,208,5.169, 
162, 141 , 198,2, 104,76,95,228 

235 RESTORE 230 

236 FOR 1=1 TO 44 

237 READB:P0KE 1535+I.B 

238 NEXT I 

240 DATA 104,162.6,160,0,169,6,32,92,228,96 "^ 

245 RESTORE 240 

246 FOR 1-1 TO 11 * 

247 READ B:VB$(IKHRt(B) - 

248 HEXT I 

250 GKiSR(ADR(VB$)) 

260 J-128 

270 FOR 1-1 TO 8 

280 BIT$((KHR>(J)J^/2 

290 NEXT) 

300 LM-23:P0SITI0N 0,0:? CHR$(125);"(EN UN DISKETTE DOS STANDARD" 

305 7 "LCS SECTORES 36 1 -368 CORRESPONDEN AL DIRECTORIO)":? 

310 ?"1.-REVISAR UN SECTOR" 

315 ? •2.-REVISAR UN SECTOR DENTRO DEL DIRECTORIO* 

320 ? "3.-RASTREAR UN ARCHIVO" 

325 ? "4.-REVISAR UN CONJUNTO DE SECTORES" 

330 ? "5.-MAPA OE SECTORES ENCADENADOS EN EL DISCO" 

335 ? •6.-MAPA DE UN SaO ARCHIVO" 

340 ? "7 -COPIAR UN SECTOR" 

345 ? "S.-raSPALDAR EL DIRECTORIO" 

350 ? "g.-PROTEGER/DESPROTEeER SECTORES" 

355 ? " I O.-REVISAR LA MEMORIA" 

356 ? :INPUT WH 

360 ON WH 60T0 400,400,450,480,2010,1800,1400,1600,1700.375, 
1900 -. . .-n 

375 ? CHR$(125):? :? :? C* 

376 ? "LOCALIZACION DE MEMORIA INiCIAL";:INPUT MEM ^- - 

377 ? :? "NUMERO DE BLOQUES A REVISAR";:INPUT NUM:G0T0 500 
400 ?CHR$(125);? :? 

405 ? "(SECTORES DEL DIRECTORIO-36 1-368)" /.. 

410 ? "QUE SECTOR";:INPUT SEC 

430 IFWH-2 THENTY-1:60T0 720 

440 60T0600 

450 ?CHR|{I25):?:? 

455 ? "CON QUE SECTOR COMENZAR EL RASTREO"; 

460 INPUT SEC.GOTO 500 

480 ? CHRt(l25) ;? :? 

485 ? "NUMERO DE SECTORES";:INPUT SEC2 

490 ?:? "SECTOR INICIAL";:INPUT SEC 1 

500 ? CHR$(125):? :? . 

510 ? "l-AUTOTRACE":? •2-PAUSE":? 

520 INPUT AP 

600 ? CHR*(125):? :? ^ ", 
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602 ? TiPO DE DESPL1E6UE:":? 

604 ? -1- CARACTERES":? ;? '•2«HEXADECiriAL'*:? :? '^3-DECiriAL'' • 

605 IF SEC< >360 THEN ? :INPUT TY:60T0 650 

610 ? :? "4-MAPA HEXADECIMAL DEL SECTOR 360":? ' 

615 INPUT TY 

650 IFWHO10THEN700 

660 LM-12:? CHR$(125):SEC=1 

662 FOR IH1EriT0riEli+l28«(NUf1-l)STEP 126 

664 POSITION 1,0:? ''MEMORIA COMENZANDO EN ";M 

670 F0RPK=1TO128 

672 BUF$(PKKHR$(PEEK(h+PK-1)) 

674 NEXTPK:60T0 735 

700 IF WH-4 THEN FOR SEC-SEC 1 TO SEC 1 +SEC2- 1 

720 BUF$(128K ":FUN-82 

730 60SUB8010 

735 REM 6UARDA LU6AR PARA FUTUROS ENCADENAMIENTOS 

740 0NTY60SU8 1040,4040,5015.4040 

765 IFWH-10THEN840 

770 IF WH<>2 THEN 800 

780 ? :? •'BYTES DE ENTRADA DEL DIRECTORIO:":? 

785 ? •'START+0-FLA6'':? -(66/N0RMAL;128/ELIMINADO;98/ PR0TE6ID0;ETCJ" 

790 ? "START+U2-C0NTAD0R DE SECTORES LO/HI":? "START+3,4- 
SECTOR INICIAL LO/Hr 

800 60SUB7010 

810 POSITION 2,20:? "NRO DEL ARCHiV0«-;FN 

815 POSITION 2,21 :? "PROXIMO PUNTERO AL SECT0R-";FP 

820 POSITION 2,22:? "SECTORES EXTRA-M25-ASC(BUF$(128)) 

840 IF PEEK{ 1 79 1 )=255 THEN 60SUB 3000 

845 IFAP-1THEN60T0 920 

850 POSITION 2,23:? "PRESIONA CUALQUIER TECLA PARA C0NTINUAR";:6ET 

♦2,P:60SUB 1105 

920 IF WH-3 AND FP-0 THEN POSITION 2,23:? BLA$;:POStTION 2,23;? TIN DEL 
RASTRE0";:AP-2;WH-1 :60T0 850 

930 IF APo 1 THEN POSITION 2,2 1 :? BLA$ ;P0S1TI0N 2,2 1 :? TRESIONA CUALQUIER 
TECLA PARA C0NTINUAR'';:6ET ♦2,P 

935 IF WH»10 THEN NEXT M 

940 (F WH-3 THEN SEC«FP:60T0 720 

950 IF WH-4 THEN NEXT SEC 

1000 60T0 300 

1040 IFWH-IO THEN 1047 

1045 POSITION 0,0:? CHR$(125);"NR0 SECT0R";SEC:? 

1047 POKE 766,1 

1060 ? "BYTE"," 02468ACE SSTLTH":? 

1061 FOR 1-1 TO 8 

1065 ?1i6*([-n;16*l-1,:F0R J-O TO 15:K-16'»(1-1)+1+J 

1067 IF ASC{BUF$(K,K))-155 THEN POKE 766,0 

1068 ? CHR$(253);"*-;:P0KE 766,1:60T0 1070 

1069 ? BUFt(K,K); 

1070 NEXT J 

1071 IF SEC<361 OR SEC>368 THEN ? :60T0 1075 

1072 POSITION 30,3+1:? 256*»ASC(BUF$(16MI-1)+5))+ASC(BUF$(16* (l-1>f4)) 
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1073 POSITION 35,3+1:? 256»ASC(BUF$(16»(l-t>+3))tASC(BUF$(t6» 

(I-IH2)) 
1075 NEXT l:POKE 766.0 

1078 RETURN . v ^ 

It 03 IF PEEK( 1 79 1 )-255 THEN GOSUB 3000 

1105 IFWH-IO THENP0P:60T0 935 

1106 FORI-1 T0 3;P0SmCN2.20+l:?BLA|;;NEXTI 

1 107 GOSUB 1200:? "DESEAS CAMBIAR EL SECTOR(S/N)";:INPUT 6$: 
IF 6$<>"S" T^€N RETURN 

1 1 10 GOSUB 1200:? "INSERTA NUMERO (N) CARACTERES (C)";: INPUT 6$ 

1112 IF Gt'"tr THEN 1 130 

1114 IF 6|<>"C" THEN 1 1 10 

1116 H$-' ":GOSUB 1200:? "CUANTOS CARACTERES OUIERES CAMBIAR";:INPUT CN 

1118 GOSUB 1200:? "EN QUE BYTE COMENZAR";:INPUT BYTE 

1 120 GOSUB 1200:? "ESCRIBE LOS ".CN;" CARACTERES A INSERTAR 

":INPUT H* 

1122 BYTE-BYTE+1:BUF|(BYTE,BYTE+CN-1)-H$:60T0 1150 

1 130 GOSUB 1200:? "CUANTOS BYTES CON EL MISMO NUMERO"; ;INPUT 

BN 
1 142 GOSUB 1200:? 'mO DEL BYTE PARA C0I1ENZAR";:INPUT BYTE:B- 

BYTE+1 
1 144 GOSUB 1200:? "BYTE ANTI6U0 ";BYTE;"-";ASC(BUF$(B,B)); 

1146 ? "BYTE NUEVO ".•BYTE;""": INPUT NB 

1148 FORHBTOB+BNl . j,v - " .; 

1149 BUF$(I,IKHR$(NB):N£XT I 

1 150 6$«" ":60SUB 1200:? "ESCRIBE S PARA tlOOIFICAR EL SECTOR"; :INPUT 6$:IF 
G$<>"S"THEN 1105 

1160 FUN»87:6OSUB80l0:P0P :60T0 720 

1200 POSITION 2,21:? BLA$:P0SITI0N 2.21 ;RETURN '-c 

1400 POSITION 0,0:? CHR$( 125);:? i 

1405 ? "NW). DEL SECTOR A C0PIAR";:INPUT SEC 

1407 ? : ? "INSERTA DISKETTE FUENTE, PRESIONA CUALQUIER TECLA" 

1410 6ET»2,P:BUFt(128K ":FUN=82;G0SUB 8010 

1420 SECT-SEC;? :? "NRO. DEL SECTOR D£ DESTINO-;;INPUT SEC 

1430 ?:? "IN^RTA DISKETTE DE DESTINO, PRESIONA CUALQUIER TECLA" :eET *2. 

P:FUN-87:60SUB8010 
1435 LK-1:SS-SEC:NSL»1:60SUB 1710 

1440 ? ;? " SECTOR ";SECT;" ANTIGUO';:? "6RABA00 COMO EL SECTOR"; 

S£C;"NUEVO":? :? "CUALQUIER TEQA PARA EL MENU" 
1445 GET *2,P:60T0 300 

1600 POSITION 0,0:? CHR$(125);:?:? "INSERTA DISCO CON DIRECTORIO A 6RABAR' 

1605 ? "Y PRESIONA CUALQUIER TECLA PARA C0NTINUAR":6£T *2,P 

1610 FUN-82:BUF$(128)«" ":FOR i-0 TO 8 

1615 SEC-360+l:60SUB 8010:N-128»l+1;Ht(N,N+127)=BUF$:NEXT I 

1620 ? :? "NRO DEL SECTOR INICIAL PARA 6RABAR DIR,";:INPUT SS 

1625 ? :? "INSERTA DISCO DE DESTINO, PRESIONA CUALQUIER TECLA"; 

GET *2P 
1630 FUN-87:F0R 1-0 TO 8;SEC-SS+I*^-128»I+1 

1635 BUF$-H$(N,N+127);60SUB 8010:NEXT liK-l:NSL=9;60SUB 1710 

1640 ? :? "DIR GRABADO EN EL SECT0R";SS;"AL";SS+8;? ;? "CUALQUIER 

TEaA PARA EL MENU" 
1650 GET *2.P«0T0 300 
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1700 POSITION 0,0:? CHR$(125):? "1- PROTEGER":? -2-0ESPROTE6ER": 

? :INPUT LK 
1705 ? :? :? XOMENZAR GON EL SECTOR" ;:iNPUT SS 

1707 ? :? XUANTOS SECTORES^ilNPUT NSL 

1710 SEC«360:F0R I-O TO NSL-1;BUF$(128K ";FUN=82:60SUB 8010 

1 720 S-SS+I :SSH«INT(S/8):SSL-S-8'» SSH 

1 72 1 BYTE-ASC(BUF${ 1 1 +SSH)):BITriOD«SSL+ 1 :BIT-ASC(BIT$ (BITMOO)) 

1722 (HJSR(ADR(ND$),BIT.BYTE):IF (LK«2 AND PEEK(209)>0) OR (LK=1 
AND P£EK(209W)) THEN 1795 

1725 IF LK-2 THEN OUSR(ADR(0AR$),BIT,BYTE):RSLT=PEEK(209): 

GOTO 1735 
1 730 Q-USR(ADR(KN0T$ ).BIT.255):RSLT-PEEK(209):CKiSR(ADR(ND$ ), 

RSLT3YTE):RSLT-PEEK(209) 
1735 BUF$(1 HSSHKHR$(RSLT):NFRE=ASC(BUF${4)}+256»ASC(BUF$ 

(5)):IF LK= 1 THEN NFRE-NFRE- 1 :60T0 1 745 
1740 NFRE»NFRE+1 

1 745 NFR£H«INT(NFR£/256);NFREL=NFRE-256* NFREH 

1 750 BUF$(4>CHR$(NFREL):BUF$(5KHR|(NFREH) 

1790 FUN-87:60SUB 8010 

1 795 NEXT I :tF WH=7 OR WH-8 THEN RETURN 

1799 GOTO 300 

1800 BUF$(I28>" -:N-0:P0StT10N 0,0:? CHR$(125):? "EL ARCHtVO 
COMIENZA EN EL SECT0R";:INPUT S£C:P0KE 82J:P0KE 201,5 

1810 FUN-82:60SUB 80IO:60SUB 7010:N=N+1:IF N'9 THEN N=l:? :? 

1820 ?SEC:SEC-FP:IFFP<>0 THEN 8010 

1830 POKE 82,2:P0KE 201,10;? :? TIN DEL riAPA..;:iF PEEK(1791)= 

255 THEN 60SUB 3000 
1840 POSITION 2,23: ? "CUALQUIER TECLA";:eET ♦2,P:60T0 300 

2010 ? CHR$(125):SEC-0:FUN»82;BUF$(128)-" ":P0S!Tt0N 1,23:? 

XUALQUIER TECLA PARA TERMINAR"; 
2020 POKE 764,255:P0KE 766,1 :FOR J-0 TO 23:P0SITI0N U:? J*30+ir-";(J+l)*30; 

2025 POSITION 9J:F0R t-1 TO 30:SEC-SEC+1 

2030 IF PEEK(764)-255 THEN 60SUB 80 1 :60SUB 70 1 :60T0 2038 

2035 POKE 764,255:P0P :POP :60T0 2150 

2038 IF NR <> 1 THEN ? "« -;:60T0 2 1 00 

2040 IF FN< 10 THEN ? CHRt(FN+48);:G0T0 2 100 

2050 IF FN>9 THEN IF FN<36 THEN ? CHRt(FN+55);:G0T0 2 100 

2060 IF FN>35 THEN ? CHR$(FN+6 1 ); 

2100 NEXThNEXTJ 

2 1 50 IF PEEK( 1 79 1 )-255 THEN GOSUB 3000 

2160 POSITION 2,23:? BLA$;;P0SiTI0N 1,23:? "PRESIONA CUALQUIER 

TECLA"; 
2200 POKE 766,0:GET *2,P:G0T0 300 

3000 POKE 764,255 :P0KE 766,1:TRAP 3060:CL0SE *3:0PEN '3,8,0. 

3020 FOR J-0 TO LMfOR 1-0 TO 39 

3030 POSITION I, J:6ET *4,K 

3035 IFKM27 TffiNK-K-128 

3036 IF K<32 OR K- 127 THEN ? *3r» ";:60T0 3045 
3040 ? *3;CHR$(K); 

3045 NEXT liPRINT :IF PEEK(764)-255 THEN NEXT J:60T0 3050 
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3047 POKE 764.255P0P :60T0 3050 

3050 LPRINTiPRINTlPRINT 

3060 POKE 766,0;TRAP 40000:RETUWI 

4040 FOR I'l TO 382 STEP 3:H=ASC(BUF$(INT(l/3)+ 1)):HH-INT 

(H/16):HL-H-16*HH:HH=HH+1:HL-HL+1 

4050 H$(I.I)-HEX$(HH,HH):H$(I+ 1 .1+ 1 )-HEX$(HL.HL):H$(l+2,l+2)-"":NEXT 

1 

4060 IF WH«10 THEN ? :60T0 4210 

4205 ? CHR$(125):? :? "SECTOR ";SEC;"EN HEXADECIMAL' 

4210 FOR 1-1 TO 16:? 8«I-1;--";8«I-1,H$(24«{I-1)+1,24'<I-1);NEXT I 

4220 IF TY=4 THEN J-47;F0R 1-5 TO 16:POSITI0N 36,1;? J;;J-J+64; 

l«XTI 

4240 RETURN 

5015 POKE 82,1 :POKE 201.5 

50 1 7 IF WH- 1 THEN 60T0 5025 

5020 POSITION 2,0:? CHR$(125);"SECT0R ";SEC;" EN DECIMAL " 

5025 ? :F0R 1-0 TO 7;? I,CHR*(30);:NEXT I;? 

5030 FORI-1 TO 16:?8«(l-1), 

5040 FOR J-1 TO 8:? ASC(BUF$(8«(I-1)+J)),CHR*(30);:NEXT J:? 

5050 NEXT l:POKE 201, 10:P0KE 82,2 

5060 RETURN 

7010 FP-ASC(BUF$( 126)):GKISR(A0R(NDj),FP.3):FP=P£EK(209)»256: 

FP-FP+ASC(BUF$(I27)) 

7050 FN=ASC(BUF J( 126):GI=USR(ADR(ND$),FN, 152):FN=INT(FN/4) 

7100 RETURN 

8010 BLK-768 

8020 POKE BLK+ 1 , 1 :P0KE BLK+2, FUN 

8040 ABUF-ADR(BUF$):AHI=INT(ABUF/256):AL0=ABUF-256''AH1 

8050 POKE BLK+4, AL0:P0KE BLK+5,AHI 

8060 SECHI=INT(SEC/256):SECL0=SEC-256»SECHI 

8070 POKE BLK+10,SECL0:P0KE BLK+11,SECHI " 

8080 (HJSR{ADR(DSKINV$)):NR-PEEK(BLK+3) ' < 

8085 IF WH-5 THEN 8100 •> 

8086 IF NR=1 THEN 8100 

8090 POSITION 0,0:? CHR$(125) :? :? :? "SECTOR ";S£C;"-S£CT0R 

MAL0":IF AP=1 THEN 8100 

8095 ? :? -PRESIONA CUALQUIER TECLA PARA C0NTINUAR";6ET *2,P: 

POP :60T0 300 

8100 RETURN 
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iYA ME SIENTO UN EXPERTO EN ATARI BASIC!, LO UNICO QUE ME FALTA SABER ES 
AL60 QUE ME PROMETI STE 6N0 TE ACUERDAS? 

algo que te prometi, ^Ser^ el uso del Joystick? 

SI! ESC ES! ME GUSTARIA PODER HACER UN PR06RAMA QUE UTILICE EL 
JOYSTICK. 

Primero te voy a dar algunas Indjcactones para que no cometas los errores que 
suelen cometer las personas que hacen rutinas para usar el Joystick dentro de 
sus programas. 

LISTO TRATARE DE NO COMETER LOS ERRORES QUE ME ADVIERTAS. 

La mayoria de las rutinas de joystick escrltas por prlnclplantes contlenen 
numerosas instrucciones IF - THEN que hacen que el joystick responda en 
forma muy lenta, 

Los prlnclplantes, ademas, a menudo ubican las rutinas de uso del joystick en 
numeros de linea muy altos (por ejemplo, 100000) y usan Instrucciones como 
60SUB 100000 para las rutinas del joystick. 

PERO ESO NO TIENEN NADA DE MALO, FUNCIONA. 

SI, funciona, pero es demaslado lento, Es mejor poner estas rutinas al 
comienzo del programa y comprobaras que aunque sean las mismas 
Instrucciones funclona mas rapldo. 

6Y CUAL ES LA RAZON DE ESTO? 

Es muy simple. Para ejecutar una Instruccl6n como GOSUB 100000 el 
computador tiene que verlflcar llnea por linea hasta que encuentra la 
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100000. SI pones la mlsma rutlna en la linea 10 el computador la encontrar^ 
mucho m^s r^pido, M^s adelante encontrar^s dos rutlnas que puedes usar en 
tus programas. 

<i,DE QUE SE TRATAN ESAS RUTINAS? iCOMO FUNCIONAN? 

El programa 1 coloca toda la 1nformac16n necesaria para manejar el Joystick 
en dos arreglos <!,sabes.para qu6?. 

BUENO, SUPONGO QUE PARA TENER TODOS LOS DATOS EN UN MISMO LUGAR. 

Y adem^s asi tienes la informac16n slempre en memoria icierto?. Entonces 
colocamos un 0, 1 o -1 en cada uno de los elementos del arreglo. X = STICK(O) 
le dar^ a X un valor relaclonado con la poslcj6n del joystick en el slot 1. SI el 
joystick est^ en la pos1c16n central, X ser^ igual a 15. Cuando los arreglos 
fueron creados, el quinceavo elemento tanto para el arreglo de fllas como de 
columnas se inlcializaron con valor cero (C0L(15) = 0; F1LA(15) = 0). Por esto, 
cuando a la pos1ci6n actual le agregas C0L(15), no hay ningun camblo, como 
tampoco habr^ cambio en la f ila. En forma similar, si mueves el Joystick hacia 
arrlba, la flla ira disminuyendo de a uno pero la columna permanece Igual. 

A VER, ESTO QUIERE DECIR QUE SI MUEVO EL JOYSTICK UN LUGAR HACIA 
ARRIBA, EL NUEVO VALOR DE X SERA 14 POR ESTO, C0L(14) = y FILA(14) = -1 
iVERDAD? 

Asi es, est^ muy blen tu razonamlento. AquI tienes la Hsta con todos los 
valores de cada uno de los dos arreglos: 

COL(I) = FILAd) = 

C0L(2) = F1LA(2) = 

C0L(3) = FILA(3) = 

C0L(4) = FILA(4) = 

C0L(5) =1 F1LA(5) = 1 

C0L(6) = 1 FILA(6) =-l 

C0L(7) = I F1LA(7) = 

C0L(8) = FILA(8) = 

C0L(9) =-1 FILA(9) = I 
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COL( 1 0) = 


-1 


FILA(10) = -1 


coL(n) = 


-1 


FILA(n)= 


C0L(12) = 





FILA(12)= 


C0L(13) = 





FILA(13)= 1 


C0L(14) = 





FILA(14) = -1 


C0L(15) = 





FILA(15)= 



NO ENTIENDO MUCHO COMO FUNCIONA E5T0. 

Veamos un poquito m^s en detalle la rutlna. Las llneas 100 y 110 
comienzan la creac16n del arreglo ubicando ceros en los elementos del 1 al 
4, ya que esos numeros no se utillzan para la lectura del joystick. La Itnea 
120 usa las sentencias DATA de las Hneas 140 y 150 para colocar los 
valores aproplados en los elementos 5 al 15 de cada uno de los arreglos. 

(!,PARA QUE SE USA LA INSTRUCCION TRAP? 7 

En las Hneas 40 y 13 aparece la instrucc16n TRAP 40, TRAP se usa aqui 
para evitar la verificac16n de los Itmltes de la pantalla cada vez que se 
recorre la rutlna. TRAP 40 mueve el programa a la llnea 40 cada vez que 
ocurre una cond1ci6n de error. Cuando la instruccidn PLOT de la Hnea 30 
trata de graficar en una pos1c16n que esta fuera de los Hmltes, TRAP 
detecta el error. Sin esta 1nstrucc16n TRAP el programa se detendria. Pero 
en esta rutlna el programa se traslada a la Itnea 40, verif ica los valores de 

la columna (C) y de la flla (F) y se resetean dentro de los Itmltes legates. 

YA ENTENDL tEl OTRO PROGRAMA FUNCIONA I6UAL? 

El programa 2 usa algunas de las mtsmas t^cntcas usadas en el programa 1. 
La dtferencta principal es que las respuestas necesartas para el 
movtmlento del joystick no se almacenan en arreglos. En vez de esto, las 
instrucctones que indican como mover el cursor se ubtcan en la Itnea a la 
cual se vuelve leyendo el joystick. 

iY COMO SE HACE ESO? 
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En otras palabras, GOTO STICK (0) lee el Joystick y va a la llnea que 
corresponde al movimlento del joystick. SI el Joystick estd en la pos1c16n 
central, la rutina va a la llnea 15 y se replte. 

Para que este programa f undone, se tienen que usar nOmeros de llnea 
aproplados. La llnea 14 movers el cursor hacia arrlba; la llnea 13 lo har^ 
hacla abajo; la llnea 1 1 a la Izqulerda; la llnea 7 a la derecha y asl 
sucesjvamente. * ' 

NO CREO QUE EL NUMERO DE LAS LINEAS SEA UNA LIMITACION TAN GRANDE. 
PODRIA ESCRIBIR: GOTO STICK(O) * 10 Y USAR LAS LINEAS DE LA 50 A LA 
150. 

Pop supuesto. GOSUB STICK(O) tambi^n es una Instruccl6n aceptable. Bueno, 
estos programas no necesltan tanta presentac16n, asi que aquj los tienes: 

PROGRAMA 1 LECTURADFI JOYS TICK US ANDQ ARREGLOS. 

REM SAVE "DJOYARR- 

10 eosue loo 

20 X-STICK(0):C-C+Ca(X);F-f+FILA(X):IF X-15 THEN 20 

30 Ca0R0:PL0T A,B:Ca0R 1 ROT C,F;A-C;B-f:60T0 20 

40 TRAP 40:IF C-1 THEN C»0:60T0 P 

50 IF C-80 THEN C"79;e0T0 P 

60 IFF-1 THENF-0:60T0P r; ; ., : i a , t , 

70 IF F-48 THEN F-47:60T0 P 

100 DIM FILA{15).Ca(15) 

no FOR X-l TO 4:FILA{X)-0:Ca(X)-0:r€XT X 

liO FOR X-5 TO 15:READ C.F:Ca(XK:FILA(XK;NEXT X 

130 GRAPHICS 2I:P-30:TRAP 40:P0KE 712,I32:P0KE 709,122:RETURN 

140 DATA 1,1,1,-1.1,0,0,0,-1.1 

1^ DATA -1,-1,-1,0,0,0.0,1,0,-1,0.0 . 



PROGRAMA 2 LECTURA DEL JOYSTICK CON LA INSTRUCCIQN C^TO 

REM SAVE ■DJ0Y60T0- 

2 60T0 70 

5 C-C+1:F-F+1 :60T0P 

6 C-C+l:F-f-1 :60T0P 

7 C-C+I:60T0P 

9 C-C-1f-F+1:60T0 P , , 

10 C<-1.f-F-1:60T0 P i. : . 

1! C-C-1:60T0P ' ' ^2' 
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13 F-F+I:60T0P 

14 F-F-1:60T0P 

15 60T0STICK(0) 

20 CaORO:PLOT A,B:CaOR 1:PL0TC.F:A-Cfi-F:60T0 15 

30 TRAP 30:IF C-80 THEN C-79:60T0 P 

40 IFC-1 THEN C-0:60T0 P 

SO IFF-48 THENF-47:60T0P 

60 IFF-1 THENF-0:60T0P 

70 P-20:6RAPHICS21:P0KE712,n6.-P0KE 709.16:TRAP30:60TO 15 

E5 INTERESANTE IR BUSCANDO FORMAS DE OPTIMIZAR EL USO DE LA 
MEMORIA Y LOS PROGRAMAS MI5M0S. ASI SE HACEN CADA VEZ MAS 
RAPIDOS. 

Desgracladamente clertas jnstrucclones y m^todos utillzan mucha 
memorla. Un ejemplo de esto, son las rutlnas que hacen llamados (CALL) o 
rutinas assembler a trav^s de la funcl6n USR. Este m^todo requlere que la 
ruttna en lenguaje de m^qulna sea inclujda en el programa codlflcada con 
Instrucclones DATA que tienen que sen leidas (READ) a ingresadas a la 
memorla con los POKES. 

Aparte de la gran cantldad de memorla que esto consume, como son rutlnas 
en assembler, para hacerles cualquler modificacl6n es necesarlo conocer 
el Assembler 6502 de Atari. 

Y PARA ESO ME FALTA MUCHO, TRATEMOS DE HACER TODO CON EL BASIC. 
iYA?. 

Bueno. Tratemos de hacer una rutina de uso del joystick totalmente en 
BASIC y tan compacto como sea posible, para equipos que tengan poca 
memorla. Adem^s tiene que ser r^pida para que los juegos realmente 
tengan accl6n. 

LO QUE ME ENSEF^ASTE HACE UN RATO TAMBIEN ES IMPORT ANTE. EVITAR LAS 
TRANSFERENCIAS A OTRAS LINEAS YA QUE SI NO ES A LA LINEA SIGUIENTE, 
EL PROGRAMA COMIENZA A BUSCAR DESDE EL PRINCIPIO. 

Correcto. Para empezar revisa esta rutina muy simple; 

20 S-STICK (S) 

30 DX-(S-5 0RS-6 0RS-7HS-9 0RS-10 0RS-U) 

40 DYHS-S OR S-9 OR S-13HS-6 OR SIO OR S-14) 

50 RETURN 
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IQUE CORTAUY COMO LA USO? 

Para usar esta rutina, tienes que hacer la variable S Igual al numero del 
Joystick que quleres leer (0 - 1). Luego, llamar a la subrutlna, en este caso 
GOSUB 20. Los valores Delta-X y Delta-Y se obtlenen en las variables DX y 
DY, respect Ivamente, Observa que el valor de entrada (S) se pierde. 51 
llegases a necesltar este valor, cambia el nombre de la variable 
param^trlca de Indlce del Joystick, Por ejemplo, si tu rutlna neceslta leer 
el Joystick para cada uno de los cuatro Jugadores en un Juego, podria 
contener la slgulente secuencla; 

FOR 1-0 TO 3 

eosi»20 .■ 

NEXT I i 

Y la llnea 20 podria camblarse de la slgulente forma; 

S-STICK(I) 

En algunas apllcaclones, puede que quleras la lecture del Joystick 
solamente para los cuatro puntos cardlnales, es declr, N-S-E-0, e 
Ignorar los movlmlentos diagonales. SI es asl modlfica las llneas 30 y 40 

de la rutlna de la slgulente forma: 

3» DX-(S-7MS-11) 

40 DY-(S-I3HS-J4) 

QUE TAL SI LO PROBAMOS 

Claro, porqu6 no. Escribe la rutlna y el slgulente programa de 
demostraci6n: - . - 

10 60T0100 

100 S-0:60SUB20 

no IFNOKDXORDY) TWN100 

120 PRINT ? •DX-"^X,T)Y-M)Y:60T0 100 

Conecta el joystick en el Slot I, luego ejecuta el programa. Observa los 



104 COMPU ATARI 

valores de DX y DY para cada una de las posiciones del Joystick. 

lESTO ME GUSTO! iSEGUIMOS PROBANDO? 

Prueba el pequeno programa de demostraclon que encontrar^s a 
contlnuacl6n. Estudia este programa para que veas como puedes usar la 
rutlna del joystick en tus programas. 

RUTINA D E USO P EL JOYSTICK EN A TARI BASIC 

REM SAVE " D : USOJOY" 

10 GRAPHICS 23:X-79:Y-47:C0L0R 1:60T0 160 

20 S-ST!CK(S) 

30 DX-(S-5 OR S-6 OR S-7HS-9 OR S-10 OR S-ll) 

40 DYKS-S OR S-9 OR S- 1 3HS-6 OR S- 1 OR S- 14) 

50 RETURN 

100 S-0:60SUB 20 ^^ 

110 IF NOT (OX OR DY) THEN 100 . , .-- -.^vc --: .-i ^.,.>. . .,^v ' 

120 X=X+DX:1F X>159 THEN X=0 ' '' ''f -•^^./ - '^'v-'^ ' -^- ' 

130 IFX<0THENX»159 

140 Y«Y+DY:IF Y>95 THEN Y-0 

150 IF Y<0 THEN Y-95 

160 PLOTX,y ., . . 

170 N-255-INT((X/159+Y/95)»125) - .= - - 

180 SOUND 0,N,10,8 ' ^ ^0 ' 

190 GOTO 100 ,., : 

NO SE LO QUE LE PASA A Ml JOYSTICK. DE REPENTE FUNCIONA, DE REPENTE 
NO FUNCIONA. NO PUEDE ESTAR MALO EL PROGRAMA PORQUE SI NO, NO ME 
FUNCIONARIANUNCA. .: .^ 

Bueno, los joysticks de Atari se producen en masa y a veces pueden fallar, 
Te voy a ensenar un programa que revela rapldamente cualquier mal 
funcionamiento en el joystick. Deberas ser capaz de poner la pantalla en 
rojo cuando preslonas el boton del joystick. Deberas, adem^s poder dibujar 
nueve puntos azules en la pantalla, correspondlentes a las nueve 
posiciones del joystick. Para limpiar la pantalla, preslonas cualquier tecla. 
Puedes controlar tambien cuan sensible es un joystick control^ndolo solo 
con un dedO; uno sensible es muy bueno para programas como Star Raiders. 

ME GUSTARIA QUE ME EXPLICARAS BIEN ESTE PROGRAMA 6P0DRIAS 
HACERLO PASO A PASO? 
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Son muy poqultas llneas, asl es que te dir^ que va haclendo cada una de 

el las: 

La IJnea 2 escoge 6R.3 y hace desaparecer el cursor (POKE 752) 

Las 1 jneas 5 a la 15 registran la posJci6n del joystick. 

La llnea 200 borra la linea antigua y dlbuja una nueva linea. 

La linea 230 dibuja el punto central y el exterior. 

La linea 300 cambia el color de la pantalla a rojo cuando se presiona el 

boton del joysticlc. s; 

Las lineas 500 a 520 escriben el valor de STICK(O) y STRIG(O); los PEEKS 

656 y 657 mantienen la escritura en solo un lugar. 

La 540 limpia la pantalla cuando se presiona cualquier tecla. 

La 999 tiene C y D con la ultima posici6n del joysticl< (C y D se usan para 

mlnimlzar el parpadeo en la pantalla), A y B son las nuevas posiclones del 

joystick y crean un "loop" continuo, 

PRUEBA DEL JOYSTICK [ 

REM SAVE • D ; PTRUEBAJ" "' 

2 GRAPHICS 3;P0KE 752, 1:60T0 999 , ^ 

5 A=24«=H:e0T0 200 * | ,,-# 

6 A-24:B=6:60T0 200 i^ ■ ^n, 

7 A-25;B-tO:60TO 200 '''' 
9 A-16:B-14:60T0 200 

10 A-)6:B-6:60T0 200 -^^ ^:.> ■...-' ."'"^Z- ./'■■■ ^ 

n A-15:B-10;60T0 200 ' '*'• ". 

13 A-20;B-t5:60TO 200 ' ' 

14 A-20;B-5:60T0 200 

15 A-20:B-10 

200 IFC<>A0RD<>BTHENCa0R4:DRAWT0 20,10:Ca0R2:DRAWTOA,B „' '• 

230 COLOR 3:PL0T 20,10;PL0T A, B 

300 POKE 712,66-STRI6(0)»66 

500 POKE 656.1 POKE 657.5 ■ if 

510 ? "STICK(O)-"; STICK (0). 

520 ? "STRI6(0K; STRI6(0) 

540 IF PEEK(764)<>255 THEN POKE 764,255;RUN ' * 

999 C-A:D-B:60T0 STICKCO) 
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En este pequeno anexo te expllcamos algunas caractertsticas m^s de los 

computadores personales ATARI. Adem^s examlnaremos muchos de los 

numerosos productos hechos por Atari y otras companlas para incrementar su 

poder y apllcactones. 

Como ya lo has escuchado muchas veces, un computador personal es una 

maqulna con la cual ejecutar pequehas tareas. 

Puede realizar una amplla varledad de tareas extremadamente rapido. Esta es 

una de las princlpales caracteristicas de los computadores, aunque la mas 

importante es que tiene una memoria para almacenar informact6n. 

Una lista de estas tareas es lo que se conoce como programa, Puedes crear tus 

proplos programas o comprarlos. En jerga computaclonal, los programas son el 

software y el resto de los equipos computaclonales es el hardware, 

II ■- CfitlMIPCiMIFMITEa mi SOaTIFIMIA COIMlPyTAgnfilWlAL ATAIBL 



Revlsemos el hardware Incluldo en un slstema computaclonal Atari tlplco, 

a) UCP El coraz6n del Atari es el mlcroprocesador o UCP ( Unldad Central de 
Proceso), un pequeno chip local Izado en el interior del equlpo, 

Este mlcroprocesador es el cerebro y centro de control, responsable de todos 
los c^lculos y manejos reallzados por el Atari. Debe cumpllr las 
instrucclones que tu 1e das y controla todas las dem^s partes de tu equlpo. El 
Atari utillza un mlcroprocesador 6502, utilizado comunmente en gran 
varledad de computadores personales. 

b) Memoria: La segunda parte Importante del computador es la memoria que 
slrve para almacenar programas y datos. El almacenam lento se realiza en 
forma de pulsos el^ctrlcos en el Interior de los chips de memoria que est^n 
conectados a1 mlcroprocesador. Como sabes exlsten dos ttpos de memoria, 
RAM (Random Access Memory) y ROM (Read Only Memory). Para entender la 



108 COMPU ATARI 

djferencia entre el las, pensemos en la memorta como en un gran plzarrdn de 
coleglo. A medjda que la profesora pasa la materia, va escrlblendo en el 
pizarr6n. Puede borrarlo y volver a escrlblr. En forma similar la memoria RAM 
puede Ilenarse de datos y luego sen borrada para poner cosas nuevas. 
Ahora imaginate un alumno que ingresa a la sala fuera de la nora y escribe con 
pintura Indeleble en el pizarr6n. Para la profesora ser^ imposlble borrar esto 
y ahora el plzarr6n no sirve para escrlblr en 61, s6lo se puede leer lo que 
escrlbl6 el alumno. Asi funciona la memoria RC^. 

Dlscutamos otro punto que es muy Importante en relacl6n a la memoria: su 
llmltaclon en capacldad. Puede recordar solo un numero determlnado de cosas 
y exjste formas de medlr su capacldad en unldades. La unldad de memoria m^s 
pequeha es el bit, que solo puede recordar si algo esta "ON" o "OFF". Ocho bits 
se comblnan para formar 1 byte que es la memoria necesaria para almacenar 
un caracter del alfabeto o un numero. Mil bytes forman un kilobyte o K, y un 
mlll6n un megabyte. La cantldad de memoria que tengas en tu computador 
determlna el tamano de los programas que puedes usar en el. Los 
computadores Atari vienen con memoria desde 16 K a 64 K RAM, 
Una diferencia importante entre los modelos 600XL y 800XL es la cantidad de 
memoria RAM que tiene cada uno. El Atari 600XL viene con I6K y si tu quieres 
expandirla, tienes que comprar una expansion que amplia su capacldad hasta 
64K, El Atari 800XL se vende con 64K. 

c) Teclado: La tercera y Ciltlma parte del computador Atari es el teclado, 
nuestro principal canal de comunlcacion con el microprocesador. SI est^s 
famlliarizado con las m^quinas de escrlblr, ver^s sus similitudes. Esto hace 
que sea muy fScil para los dactll6grafos digitar. 

Tiene ademas una serie de teclas extra que expllcaremos m^s adelante. 
Existe una gran diferencia entre los teclados de los dos modelos Atari que 
hemos nombrado. 

Ahora que ya hemos visto las partes del computador, veamos el resto del 
hardware necesarlo para completar el sistema. Estos otros elementos son los 
perl f^ri cos. 

d) Monitor: Es probablemente el perif^rico m^s crucial del sistema. Permlte 
que el computador se comunique con nosotros, mostrando letras o dibujos en 
la pantalla. El mlcr6fono del monitor se usa para crear mCisIca y sonldos 
controlados por el Atari. El Atari est^ disenado para usar cualquler Televisor 
como monitor y ademas pueden usar monltores especialmente dlsenados para 
ser usados con computadores, con lo que se obtlene una Imagen mSs clara. 
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estamo3 reviaando la imagen con detencii 
y. .,caramba,no me parece en absolute. 
Ya tenfamos referencias del juez.el afio 
72 ya le anulo'un gol legitlmo al elenco 
albo ...vean como hay un hombre que 
habiHta toda la jugada.El guardalineas 
no levanta 3U b8nderola!...a ver si podenr 
repetir esa accio'n vean nnno me parece, 
Pedro^que haya eatado acertado Arfifilo ^ 
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e) Cassettera y Diskettera: Otro importante perlf^rlco es el "dlspositlvo 

de almacenam lento de datos". Esto podria parecer innecesarlo, ya que tenemos 

toda la memoria RAM para almacenar datos. Sin embargo, esta memorla tiene 

un gran problema: cuando el computador se desconecta, todo lo que est^ en 

el la se borra. La solucion es leer el contenldo de la RAM y pasarlo a otro 

perjf^rico que pueda almacenar datos sin necesldad de estar conectado a la 

electrlcldad constantemente. 

6Entonces para que usar la memoha RAM si es volatil?, Bueno, su facilldad 

para borrar y aceptar nuevos datos hace que sea muy f^Ol para el 

microprocesador usarla. Es mucho m^s rSpida que el mejor dlspositlvo de 

almacenamlento. 

Un tipico slstema Atari usa uno o ambos dispositlvos de almacenamiento: 

cassettera y diskettera, La cassettera es mucho mas econ6mlca que la 

diskettera, Los datos son convertidos desde la RAM a senales el^ctricas, que 

se registran en un cassette, de la misma forma que la musica. 

La diskettera almacena datos en un disco pequeno flexible cubierto de 

plSstlco conocido como "floppy disk" o diskettes, Los diskettes estSn hechos 

del mismo material que las cintas de grabacion pero son un poco m^s gruesos. 

Los diskettes vienen protegidos con un sobre para que no se danen. 

La diskettera tiene una cabeza lecto-grabadora que se mueve sobre la ranura 

ovalada que tiene el sobre del diskette, Esta cabeza grabadora puede registrar 

senales electricas en el disco de la misma forma que las cabezas grabadoras 

de las cassetteras lo hacen con los cassettes. 

Las mayores ventajas de las disketteras frente a las cassetteras son su 

velocidad y accesibilidad a los datos, Puede cargar y grabar datos de 10 a 20 

veces mas r^pido que una cassettera, Adem^s puede almacenar y recuperar 

datos en cualquier orden. 6Y como nos ayuda esto?, Hagamos una analogia. 

Consldera el tiempo que gastas buscando una cancion en un cassette; tienes 

que ir deteniendote cada cierto tiempo para ver si Uegaste a la cancion que 

buscabas. Si tienes un disco, en cambio, ves en el indice la ubicaci6n y colocas 

la aguja directamente sobre el comlenzo de la cancion. En forma similar, los 

datos almacenados en un diskette pueden encontrarse casi instantaneamente, 

Cada disco tiene un directorio que informa todos los programas e informaci6n 

contenidos en el disco. 

El computador puede revisar ese directorio e ir directamente a los datos 

requeridos. 

Existe una tercera manera de almacenar datos, aunque si no tienes 

equipamiento especial, no puedes hacerlo, 

Este m^todo es grabar los datos en un chip ROM como una serie de circuitos. 
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Una vez que se ha creado el software se inserta en el chip y queda alii para 
siempre sin sufrlr dafios. Puedes comprar programas almacenados en ROM, los 
que generalmente vienen en un cartridge. La ventaja principal del cartridge es 
que carga en forma Instantcinea slmplemente Instalandolo y encendlendo el 
equlpo, Los cartridges adem^s son muy durables, 

Memos visto el hardware incluldo en un slstema de computador Atari tipico: 
el computador proplamente tal, un monitor para ver la Informaclon y un 
disposltlvo de almacenamlento (dlskettera o cassettera). Aunque cualquler 
slstema Atari funcional neceslta a lo menos estos elementos para obtener 
resultados, se le puede agregar muchos otros perif^ricos para aumentar su 
podery versatilidad. 



Un computador sin software no puede hacer nada. El Software vlene en varlos 
medlos de almacenamlento: diskettes, cassettes y cartridges. Adem^s puede 
venir escrlto en dlferentes lenguajes de programacion. Revisemos los dos mas 
comunmente usados en Atari. 

a) Lenguaje de Maqulna. E l lenguaje de maquina es el lenguaje Interno del 
computador: todos los comandos que reclbe el mlcroprocesador deben estar en 
lenguaje de m^qulna. Es un lenguaje muy r^pldo y eficlente usado por 
programadores avanzados, pero no es send Ho. Se escribe como una serte de 
nCimeros, los que son convertidos a Impulsos el^ctrlcos que le indican al 
mlcroprocesador que hacer. 



b) BASIC. Y a que a la mayoria de la gente no le gusta hablar en numeros, 
afortunadamente eKlste gran varledad de lenguajes de programacion mucho 
m^s f^ciles de usar, que se conoce como "amlstosos", Uno de los lenguajes 
m^s amlstosos es el BASIC que utlllza palabras en ingles para dar 
Instrucclones al computador. Para poder usar el BASIC en el Atari, debemos 
tener un programa "int^rprete" que traduce las instrucclones en Ingl6s a 
lenguaje de m^qulna. 
BASIC puede venir incluldo como un lenguaje con los computadores Atari o 
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como alternatjva en un cartridge que se instala en el slot que est^ en frente 
del computador. El Atari 800 XL tiene BASIC en ROM, 
Los computadores Atari se comerclallzan con gran varledad de Software 
adlclonal. Por ahora, revlsaremos el software que por lo general se incluye en 
un sistema computaclonal simple. 

c) El Sistema Qperatlvo. U n programa muy Importante que se Incluye en 
todos los Atari es el Sistema Operatlvo (SO), escrlto en lenguaje de m^quina 
que ejecuta todas las funclones fundamentales del computador, Sin Sistema 
Operatlvo, el computador, aunque lo enciendas, no haria nada. El Sistema 
Operatlvo le Indlca que responda al teclado, como mostrar las cosas en la 
pantalla, como recibir los programas de la cassettera o diskettera y miles de 
otras cosas. El Sistema Operatlvo est^ contenldo en una ROM que est^ bajo la 
cublerta del computador y empleza a funclonar en el instante en que el 
computador se enclende. 

d) El sistema Operatlvo de Dtsco (DCS.). SI compras una diskettera 
Atari, esta Incluye un programa que se llama Sistema Operatlvo de Disco 
(D.O,S,). DOS viene en un diskette y se carga en el computador cuando ^ste se 
enclende, DOS le da al Atari la capacldad para Intercambiar datos con la 
diskettera, revisar el dlrectorlo del disco y controlar el motor del drive. Sin 
DOS no puedes usar la diskettera Atari. 



2^ 



Conectar y hacer funclonar un computador Atari no es muy dlficil. El 
computador y sus perlferlcos ban sido disehados para conectarse unos con 
otros f^cilmente. La Cinlca herramlenta que podrias necesltar es un 
destornlUador, Solo sigue las instrucciones del manual del usuarlo, cualquiera 
sea el modelo que tengas. 

No necesttas condiciones amblentales especlales, pero es bueno que busques 
un lugar agradable donde quepa tu equlpo y perlferlcos sin problemas, 
Lo prlmero que debes hacer es conectar el monitor (o TV) al equlpo y luego 
conectarlos a la electrlcldad, siguiendo las instrucciones del manual. Una vez 
hecho esto enclende el computador (POWER) para ver como funciona. SI no pasa 
nada, verifica las conecciones. Ahora que funciona podemos desconectarlo e 
instalarle el disposlttvo de almacenamlento, Nuevamente, sigue las 
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tnstrucclones de los manuales, ya sea para cassettera o diskettera. 
SImplemente enchufa el conector del joystick o del paddle al jack Ns 1; si 
necesitas conectar otro hazlo en seguida. 

g;,~ iDSia nnFn tifph am 

Ya sabemos que el coraz6n del Atari es un microprocesador, un pequeno chip 
localtzado dentro del computador. El teclado nos permite comunlcarnos con el 
microprocesador. Cada vez que preslonas una tecla, aparece un caracter en la 
pantalla y ademas es enviada al microprocesador. Hay una parte especial en el 
Slstema Operative, el "editor de pantalla", que maneja lo que se escribe en la 
pantalla. Para poder "conversar" con nuestro computador, necesltamos saber 
las reglas por las cuales se rige el editor de pantalla. 
A contlnuacl6n veremos como funciona cada una de las teclas y como el editor 
de pantalla tiene culdado al desplegar nuestros mensajes en la pantalla. 
Notar^s varlas cosas Interesantes. Por ejemplo: si mantienes prestonada una 
tecla se repetira el caracter o funclon que representa en la pantalla. SI dejas 
el teclado por m^s de 8 minutos, notar^s que la pantalla camblarS de color, 
este es un metodo de proteccidn de la pantalla que termlna apenas preslonas 
una tecla. 

Algo muy Importante es el pequeno cuadrado bianco que se mueve en la 
pantalla que se conoce como "cursor". Aparece para Indicarte donde est^s 
escrlbiendo. Salta autom^tlcamente de una linea a otra sin necesldad de 
preslonar RETURN, en Ingles el t^rmlno que describe esta caracterlstica es 
Wraparound, 

Puedes moverte a cualquler poslcl6n de la pantalla sin necesldad de escrlblr. 
En el borde Izqulerdo del teclado hay una tecla marcada CTRL. Preslona esta 
tecla simultaneamente con una de las teclas de la derecha marcadas con 
pequenas flechas en cuadrados blancos. Es Interesante ver que si pasas sobre 
caracteres que ya escrlbiste en la pantalla no los borra, simplemente los deja 
en modo "inverso" cuando esta sobre el los y sigue de largo. En camblo si 
escribes un caracter, ellmlnas el anterior, 

Una vez que haz llegado al final de la pantalla el editor autom^tlcamente sube 
todas las fllas un lugar m^s arrlba y deja una llnea en bianco en la parte 
Inferior, esto se llama "scrolling". SI quieres borrar todo lo que aparece en la 
pantalla, preslona CLEAR. 

Dlvldlremos las teclas en 4 tipos diferentes para entenderlas mejor. 
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a) Teclas de Caracteres ~> cuando son preslonadas producen caracteres 
en la pantalla, 

b) Teclas de Edictdn — > no producen caracteres pero mueven el cursor, 
limplan la pantalla, desplazan caracteres dentro de la pantalla y otras 
fund ones, 

c) Teclas de Programac16n — > es un pequefio grupo de teclas que se usa 
para ejecutar tareas especlales cuando se programa, 

d) Teclas de Control de Programa ~> estas teclas se usan para controlar 
un programa cuando se est^ ejecutando, 

a) Teclas de Caracteres : Son las m^s simples: letras, numeros, puntuacjones y 
simbolos matematicos que aparecen en las teclas centrales. Cuando las 
presionas aparece el caracter en la pantalla, La barra espaciadora en la parte 
Inferior del teclado tambien es una tecia de caracteres, produce espaclos, 
Algunas teclas son de caracteres multiples, tienen varios simbolos que se 
usan con las teclas SHIFT y CTRL, 

b) Teclas de Edlcl6n: Generalmente se ubican a la derecha y a la izquierda del 
teclado. Revisemoslas una a una. 

Tecla SHIFT ~> permite obtener un segundo caracter de la mayoria de las 
teclas. Hay dos teclas SHIFT, una a cada lado del teclado, 
Por lo general, entrega la mayuscula de la letra o el simbolo que aparece en la 
parte superior de la tecla, 

CAPS— > Habras notado que todas las letras que aparecen en la pantalla son 
mayusculas. La tecla CAPS te da la posibilidad de escribir con mlnCisculas, 
Solo afecta a las teclas con letras. Para poner un "*", por ejemplo, de todas 
maneras hay que apretar SHIFT y un 3, Para volver a mayuscula se presiona 
SHIFT y CAPS juntos (solo se presiona por segunda vez CAPS). 

CTRL — > CTRL es como un segundo SHIFT que te permite usar caracteres 
graficos (puedes mirar tu manual para ver la local Izacion de cada figura en el 
teclado). Ademas en las teclas que tienen 3 simbolos nos entrega esa tercera 
func16n (como las flechas). 
Puede ser bloqueada prestonando juntas CTRL y CAPS. Para volver al modo 
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mayusculas se presiona SHIFT y CAPS. 

El uso de la tecia CTRL con los numeros da resultados blen Interesantes. 
Presiona CTRL y el numero uno juntos y trata de escrlbir en el teclado; lesta 
bloqueado!, no puedes escrlbir nada. Vuelves a1 estado normal con CTRL 1. 
CTRL 2 hace sonar una alarma y CTRL 3 crea una serial EOF (fin de archivo), 
Con el resto de los numeros no pasa nada, 

TECLA DE VIDEO INVERSO estS locallzada a la derecha del teclado, 
presionarla una vez aparecen todos los caracteres en Inverso. Al preslonarla 
por segunda vez, los caracteres que se diglten aparecen en forma normal, 

RETURN ~> En una m^qulna de escrlbir, la tecla RETURN slrve generalmente 
como avance de carro, terminando la linea que estas escriblendo y pasando al 
Inlcio de la sigulente, una linea mas abajo. La tecla RETURN del Atari hace 
esto mismo en la pantalla, pero no es exactamente como la tecla RETURN de la 
m^qulna de escrlbir, Plensa en la tecla RETURN como un mensaje al 
computador que le dice "ya escrlbi, ahora te devuelvo el control para que 
puedas leer ml mensaje", 

TAB/SET/CLEAR — > esta tecla es realmente tres teclas en una. Al 
presionarla sola actua como tabulador. Con SHIFT se habillta la funclon SET 
que sirve para deflnir los distlntos puntos de tabulaclon. Con CTRL te permlte 
ellmlnar un punto de tabulaclon. 

TECLAS DE MOVIMIENTO DEL CURSOR (->, I, <- y I) --> estas teclas 
normalmente son teclas de caracteres, cuando las usas solas o con SHIFT, Con 
CTRL mueve el cursor en la direccion de la flecha. Son muy utiles. 

DELETE/ BACK S ~> esta es una tecla con tres funclones que te permlte 
borrar caracteres de la pantalla. Al presionarla sola mueve el cursor un 
espacio hacia atras (izquierda), borrando todo lo que encuentre. Esta es la 
funci6n BACK S. 

La func16n DELETE puede usarse con SHIFT y con CTRL. SHIFT DELETE hace que 
desaparezca completa la linea en la cual est^ el cursor. CTRL DELETE hace que 
el caracter que est^ bajo el cursor desaparezca. 

INSERT ~> es parte de una tecla de caracteres. La tecla INSERT solo 
funclona con CTRL o SHIFT. Piensa en INSERT como en el ant6n1mo de DELETE. 
SHIFT INSERT hace que aparezca una linea en bianco donde esta el cursor y 
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todas las dem^s se mueven hacia abajo. CTRL INSERT agrega un espacio 
cofTlendo los caracteres bajo el cursor a la derecha. 

CLEAR ~> tambj^n es parte de una tecla de funciones. Da lo mismo usarla 
con CTRL SHIFT y hace que se borre todo lo que hay en la pantalla y el cursor 
vuelva a la esqulna superior izquierda. 

c) Teclas de Programacl6n. _.-.,. 

Las teclas programables se usan cuando se esta escrlbiendo o ejecutando un 
programa. 

ESC — esta tecla, abrevlatura de ESCAPE, le indjca al Atari que ignore la 
siguiente tecla de edici6n que se presione e imprlma un sJmbolo especial que 
represente esa funcion. Presiona ESC una vez y luego DELETE / BACK S. Ver^s 
una flecha en la pantalla pero no se ejecuta la funcion. Lo mismo pasa con 
CLEAR, INSERT y el mismo ESC. No funciona con RETURN, SHIFT, CTRL, CAPS, 
BREAKy la tecla Atari, 



BREAK —> la tecla BREAK se usa para Indicarle al computador que termlne lo 
que est^ haciendo. Puedes usarla cuando el computador est^ ejecutando algun 
programa largo que quieres detener, ya sea para cambiar algo en el programa o 
para cargar un nuevo programa. 

d) Teclas de Control de Programa. 

Hay cinco teclas "especiales", de control de programa o de "consola": 

- HELP 

- START 
-SELECT 
-OPTION 
-RESET 

Las teclas START, SELECT y OPTION no nos ser^n utiles por ahora, porque sus 
funciones dependen de un programa ejecut^ndose. START puede usarse para 
comenzar un juego o para hacer que el programa calcule algo. SELECT puede 
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eleglr entre vartas versiones del programa. Es Importante recordar que estas 
teclas no tienen funciones establecldas y a menudo no se usan en algunos 
programas que se ejecutan. RESET es una tecla de emergencia. La gran 
diferencia entre presionar esta tecla y apagar y encender el equipo es que 
RESET no borra un programa en la memorja del computador. 

A- n iFionTiniiB m w^amtmia. 

Seguramente habr^s notado que a veces el editor de pantalla hace cosas 
Inesperadas, Por ejemplo, a veces suena una "alarma" cuando escribes, Si usas 
SHIFT DELETE para borrar una linea borra varias lineas. iQu6 est^ pasando?. 
Cuando mtramos la pantalla vemos caracteres en distlntas lineas y columnas. 
El editor ve las cosas diferentes, Lo que vemos como una linea puede ser 
simplemente parte de una linea m^s larga. Para diferenclar entre nuestra 
linea y la linea del editor de pantalla, necesltamos nombrar dos tlpos 
diferentes de lineas. Estas son la linea fislca y la linea I6g}ca (lo que el 
editor ve), 



Cuando queremos envlar un mensaje al microprocesador lo escribimos y luego 
preslonamos RETURN que marca el fin de un mensaje y el inicio del otro. Como 
es solo un pequeno microprocesador no puede reclbir mensajes muy largos. El 
editor de pantalla limita los mensajes a tres lineas fislcas, Este mensaje 
seria una linea I6gica, ^ ^ .- - . 

Entonces cuando el computador hace sonar su alarma es porque te encuentras 
8 caracteres antes del final de una linea I6gica, Al presionar SHIFT DELETE 
borrar una linea 16gica, no f Is ica. ^__ 



Como todos los programas que te entregamos en este llbro estan escritos en 

BASIC, es interesante hacer algunas acotaciones al respecto. 

Existen varias versiones de BASIC de disco disponibles para Atari: entre el las 

una de Microsoft, que tambl^n se usa en muchos otros computadores, Adem^s 

del BASIC Atari, incluldo en ROM en el computador. * 

Como sabes hay dos formas de utillzar BASIC: ■ - 

- Modo Inmedlato -> tipeas la lnstruccl6n y la ingresas preslonando RETURN. 

El computador ejecuta el comando inmedlatamente. 
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- Modo dfferldo -> podemos Ingresar una larga llsta de Instrucciones en el 

orden que deseemos. Prtmero se escribe un numero positive entre y 32767, 

un espacio y tu lnstrucc16n. Al final un RETURN. El computador almacena estas 

Instrucciones y las ejecuta solo cuando se lo Indlcas con la lnstruccj6n RUN. 

Cuando el computador ejecuta un programa, verlflca los nCimeros al comlenzo 

de cada Itnea en el programa y los va ejecutando en orden numerico, del 

numero de Ijnea m^s pequeno al mayor, Los numeros no tienen que sen 

consecutivos. 

Hay algunas Instrucciones que alteran el orden en el cual el computador 

ejecuta el programa. GOTO, por ejemplo es una Instruccl6n que va segulda de 

un nOmero de llnea. Cuando el computador ejecuta esa instruccl6n, salta al 

nCimero de llnea menclonado y comlenza a ejecutar las Instrucciones desde 

alii. 

Si tienes una cassettera y quieres grabar tus programas en cassette, esto es 

lo que tienes que hacer. 



I,- Pon un cassette reboblnado (al principio) en la cassettera. 

2.- Ingresa el comando CSAVE que slgnifica CASSETTE SAVE. Escuchar^s dos 

zumbldos del computador. Es la serial para presionar dos botones en la 

cassettera. 

3.- Presiona simult^neamente los botones de PLAY y RECORD y deber^n 

quedar bloqueados. 

4- Presiona RETURN en el computador. Escuchar^s un ruido proveniente del 

monitor y el cassette comenzar^ a moverse. Despu^s de unos pocos segundos, 

oiras algunos sonldos desagradables, ino te asustesi es el sonldo de tu 

programa que se esta transflriendo al cassette. Cuando termina, se acaba el 

ruido y aparece la palabra READY en la pantalla. 

5.- Presiona el bot6n STOP de la cassettera y rebobina el cassette. 

Tu programa ya ha quedado grabado. 

Si vas a almacenar tu programa en una diskettera, necesitas ponerle un 

nombre al programa. DOS te lo plde para poder llamarlo despu^s. DOS es muy 

especial con respecto a los nombres, deben cumpllr estas reglas: 

- Maximo 8 caracteres. 

- Solo letras de la A - Z y nCimeros del 0-9. 

- El nombre debe comenzar con una letra. 

- No acepta mlnusculas, caracteres inversos, ni espaclos. 

Si necesitas mas de 8 caracteres puedes agregar 3 mas si pones un punto 
antes, Esto constituye la extension. 
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Se utiljza el comando SAVE para grabar segutdo de 'D;' para Indlcar que ser^ 

en disco y luego el nombre del programa. Esta lnformac16n debe Ir entre 

commas, por ejemplo, SAVE "D ; TEXTO". Despu^s de ingresar este comando la 

diskettera comlenza a funcionar y el parlante del monitor emlte una serle de 

ruldos. Al final aparece READY que te Indica que tu programa fue grabado, 

51 quleres recuperar un programa que haz grabado en un cassette, slgue estas 

Instrucclones; 

1 ,- Pon el cassette. 

2.- Escribe CLOAD (CASSETTE LOAD) y escuchar^s un zumbldo del computador, 

Esto te Indlca que preslones una tecla en la cassettera. 

3.- Preslona el bot6n PLAY, 

4- Preslona RETURN. Se traspasa el programa del cassette a la memoria del 

computador. Al final aparece READY. 

5.- Preslona STOP en la grabadora. 

6.- Reboblna el cassette para la proxima vez que lo uses. 

Cargar un programa desde un diskette es muy send Ho : 

1.- Insertael diskette. 

2.- Escribe LOAD "D : seguldo por el nombre. 

Cuando final iza aparece la palabra READY. Escribe RUN para ver si el programa 

funciona, 

SI est^s usando una diskettera para cargar el programa, puedes acortar el 

proceso escribiendo: RUN "D ; TEXTO" y con esto combinas el comando LOAD y 

RUN. 



(R - AniMIArFBflAMiFMTO m AWiriHlllWnS- (TASSFTTFg V IBlli «lif FTTIPg 

A medlda que comlences a trabajar con tu computador, comenzar^s a acumular 

programas y datos, llamados por lo general "archlvos", 

Cuando grabas lnformacl6n en un cassette, es convenlente grabar solo un 

archlvo por lado y asl no tienes problemas para encontrar el Inlcio de tu 

archlvo. De otra forma deber^s usar el Contador de la cassettera. 

La primera vez que usas un cassette asegCirate que este al principio y el 

contador en 0. Despues que hayas grabado un archlvo deja por lo menos 10 
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espacjos llbres y escribe el numero del contador. Est^s en condiciones de 

grabar tu segundo archlvo. Al cargar un archive slempre deja el cassette al 

princlpio y avanza hasta la poslcl6n donde est^ el archive deseado y sigue el 

procedlmlento normal. No es raro que desaparezca algun archlvo por arte de 

magla, sobre todo si el cassette est^ cast completo. 

Otro punto importante es que los contadores varian de cassettera en 

cassettera por lo que puedes tener problemas al buscar un archlvo que fu^ 

grabado en otro equlpo. 

Como puedes ver, los cassettes no son slempre el medio de almacenamlento 

m^s conflable. Es Importante respaldar, hacer coplas de los archives 

Importantes. Adem^s, cuando tengas archives Importantes que no quieres que 

se te borren JamSs, hay una forma de proteger el cassette, quebrando una de 

las pequehas patltas que tiene atras (la del lado derecho). Para proteger el 

otro lade, quiebras la del otro lado. 

Notar^s que es Imposlble grabar en este cassette, 

Como regla, el almacenamlento de archives en diskettes es mucho m^s 

convenlente y ef Iclente que el almacenamlento en cassette. 

Los diskettes estandar que usa Atari son de 5 1/4" de densldad simple, un lado 

y sectorlzados per software. 

Es necesarlo formatear los diskettes antes de usarles, per esta caracterlstica 

de ser sectorlzados per software. Esto se puede hacer a trav^s del menCi del 

DOS. 

Obtendr^s el MenO del DOS cada vez que enclendas el equlpo sin cartridge (per 

supuesto, con el diskette de DOS en la diskettera), Si estas en BASIC 

simplemente escribe DOS. Notar^s que aparecen varlas opciones despues de 

las letras A a la 0. Cada una de estas opciones ejecuta algun tlpo de tarea que 

te permlte coplar archives, meverles de disco a disco, renembrarles, 

borrarlos, etc. Aprender a usar todas estas opciones toma su tiempo, no las 

revlsaremos todas. 

- Opcl6n de Formateo; Para formatear diskettes nuevos debes Insertarlos 
en la diskettera y seleccionar la Opcl6n I del menu DOS. Cuando el computador 
te pregunte que drive formatear, pen 1, a menes que tengas m^s de una 
diskettera. Luege Atari te pide la confirmacl6n y escuchar^s el sonide de la 
diskettera. Una cosa muy Importante que hay que saber del formateo es que 
BORRA TODO LO QUE HAYA EN EL DISKETTE. La epcl6n de formateo puede ser 
muy Otil come borrador de diskettes, pero Osala con culdado. 
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- Opci6n de Directorlo del Diskette: AlgCin dia puede que no sepas que 
contlene un diskette. Ponio en la diskettera y utillza la opc16n A, el directorlo 
del disco. Escribe A segulda de dos RETURN. En la pantalla aparecer^ una Usta 
de todos los archlvos del diskette. 

Cada archlvo va seguldo de un nCimero que nos Indlca cuantos sectores ocupa 

para almacenarlo. Un sector es un Srea del diskette que almacena 128 bytes de 

Informacldn. 

Al final de la llsta aparece una llnea que te Indlca la cantldad de sectores 

disponibles. 

- Opcldn de Escrlblr los Archives del DOS: Puede ser muy aburrldo tener 
que estar camblando diskettes cada vez que quieres cargar el DOS. Es m^s 
f^cll tener el DOS. Es m^s f^cll tener el DOS en el disco que estas usando, la 
opcl6n H te permlte hacer esto. Una vez que tengas el diskette en el drive, 
escribe H y el computador te preguntar^ en que drive est^ el diskette, luego te 
plde la conf irmaclbn y el DOS ser^ copiado a tu diskette. 

- Opci6n de Cargar un Cartridge: La ultima opcl6n del DOS que veremos es 
la B, Run Cartridge. SI quieres volver al BASIC o cualquier otro lenguaje en un 
cartridge, escribe B. El menu del DOS desaparece y estas de vuelta en el BASIC 
en el Cartridge. 

Como vetamos rec16n, cada vez que formateas un diskette se borra todo su 

contentdo por lo que es posible que por equlvocacl6n, borres archlvos 

Importantes. Por esto podemos proteger los diskettes para que no se pueda 

escrlblr encima. 

Si te fijas, al lado dereciio del diskette hay una ranura por la cual pasa un 

rayo de luz cuando el diskette est^ en la diskettera y quieres escrlblr en 61. SI 

este rayo de luz no pasa, no puedes formatear nl escrlblr en ese diskette. Para 

protegerlo debes ponerle una de las etiquetas plateadas o doradas que vienen 

en las cajas de diskettes. SI no las tienes, puedes usar un pedazo de cinta 

adheslva negra o de algun color que no deje pasar la luz. 

SI quieres escrlblr de nuevo en el diskette, simplemente retira las 

protecciones, 

Cuando se fabrican los diskettes, se revisa cada lado para ver si permlte una 

correcta grabacl6n. SI un lado no cumple las normas de conflabllldad, ese 

diskette ser^ un diskette de un lado. En la mayoria de los casos, el lado no 

certif Icado se puede utillzar en el Atari. La Cinica raz6n por la cual no se usa 

es que no tiene la ranura para poder escrlblr en 61. 
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SI !e haces una ranura a) lado opuesto de la ranura original, podr^s escrlblr en 
el reverse del diskette. Asegurate de que la ranura quede a la misma altura de 
la otra para que puedas grabar. Debes tener en cuenta que a I hacer esto 
plerdes la garantta del diskette y no siempre funclona. 
Sabres si el lado opuesto funclona si es que puedes formatearlo, 

7,- PEBIIFEJRIIICiaa 

Existe gran cantldad de perlf^rlcos que agregarle a tu Atari, asl que antes de 

ponerte a gastar plata en hardware para tu equlpo, revlsa blen tus 

necesldades. Respondlendo satlsfactorlamente a las 4 preguntas slgulentes te 

puede ayudar a evitar la compra de un perlf^rlco que solo sirva para acumular 

polvo, 

6E1 perlf^rlco hace lo que quieres que haga? 

La Impresora COLLOSO 8000 escribe 8000 caracteres por segundo, pero s61o si 

el texto es en Japon^s; seguramente no la necesltas. Tienes que sen muy 

especif Ico acerca de lo que quieres que haga un perlferico antes de comprarlo. 

iEs compatible el perlferico con tu equlpo? 

Asegurate primero de todo lo que puede conectarse al Atari. AsegOrate 

tambl^n que tengas la memorla necesaria para soportar el perlferico. Algunos 

perlfencos necesltan cables de conexl6n y equlpamlento especial antes de 

Instalarlos, Asegurate de que esten disponlbles. 

iPuedes comprar o escrlblr software para utillzar el perlferico?. A menos que 

tu Atari tenga un programa que te Indlque como dar ordenes a este extraho 

aparato, no harS nada. Algunos proveedores venden el software con sus 

perlfencos, otros te permlten escrlblr tus proplos programas o encontrarlos 

en el mercado. 

iExlste algCin Manual claro o algCin experto que te asegure que sabres como 

usar el perlferico?. Nunca olvldes que la mayoria de los equlpos 

computaclonales son compHcados y necesltan Instrucclones Claras para sen 

operados apropladamente. SI tienes un amigo experto o el vendedor lo es, 

fant^stlco. St no, asegurate que entlendes el Manual. 

Ahora echemos un vlstazo a los productos mas populares. Como la Industria de 

los microcomputadores est^ camblando constantemente, tienes que estar 

alerta a los nuevos productos que aparecen en el mercado y los que se 

disconttnuan. 

a) Impresoras -> te permlten obtener una "copta dura" en papel, que no se 

borra cuando apagas el equlpo. 
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Uno de los primeros aspectos a conslderar es )a calldad de la Impresl6n, La 
mayorja de las Impresoras son de matriz de puntos: forman los caracteres con 
un pequeno cabezal con puntas que barren el papel cada vez que Imprime una 
llnea. Las puntas chocan con una cinta entlntada en una combtnacl6n correcta 
para crear cualqulera que sea el caracter deseado. Mientras m^s puntas 
tengan, m^s complejos y bien formados serein los caracteres que Imprime. 
Un tipo mas econ6mlco de impresoras de matriz de punto se llaman 
impresoras t^rmlcas, que usan un papel especial e Imprimen usando puntas 
calientes que "queman" los caracteres en el papel quimico. Su mayor 
desventaja es que deben usar papel especial y la calidad de la Impresl6n no 
siempre es buena. 

La mejor calldad se obtlene con las impresoras de "margarlta" que escrlben 
letras igual que una m^quina de escriblr. Tienen una pequena rueda que gira (la 
margarita) con muchas "patitas" flexibles. 
Otros aspectos a considerar son: 

- Si es bidireccional (capaz de imprimir de ida y vuelta, lo que la hace mucho 
mas r^pida). 

- SI permlte imprimir 80 columnas (carro angosto) u 132 columnas (carro 
ancho). 

- Si tiene alimentacl6n por friccl6n (para hojas sueltas), alimentac16n por 
tractor (para papel computacional, con "hoyitos") o ambos. 

- El tamaho del buffer. El Atari envia el texto a la impresora muy rcipido y 
6sta lo usa lentamente, lo que hace que el computador tenga que esperar. Un 
buffer es memoria en la impresora que almacena el texto del computador y se 
lo va entregando a la impresora. 

- La capacidad graf ica, etc. 

b) Modems -> un modem es un perif^rico que te permlte enviar datos de tu 
computador via tel^fono y recibir datos de otros computadores. 
Sus caracteristlcas m^s importantes son la velocidad (medida en bps, bits por 
segundo), la frecuencia de la senal (en baudlos), el tipo de transmisl6n (full 
duplex que permite recibir y enviar informaci6n a la vez o half duplex, que 
permite una cosa a la vez). 

Otros peri f6ri cos importantes son: 

- Controladores para Juegos. 

- Idplces lumlnosos. 

- plotters, etc. 
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Acerquese a $u Centro Atari; 



Los Centres \iari fueron creados 
pcva dar respuestas a cualquier 
inquietud que usteo teiga ccn 
respecto al uso y utifidad que drinda 
su compuiadof, 

Para esto, cada Centra Atari 
cuenia cor un equ;pD humano 
especializddo.que ie hara 
demoslraciones par? que usted y sus 
hijos conozcan lo facil que es operar 
su coniputadof Atari. Ellos Ie 
bnndaran apoyo, asesoria y 
asistencia tecnica permanente 
Edemas, Ie entregaran infoif-ddon 
acruafe-ada de todas las novedades 
Cf )a fjnnputacion Aran. 

I.os Centres Atari cuentan con 
una jmplia bibliotecii especu-iizada, 
a la que usted y sus hyos tienen libre 



acceso. En ellos encontrara un 
extenso material de lectura para 
complementar sus conoomientos. 

Algo importante JODOS ESTOS 
SERVriOS SON TdTALME^rrE 
GRATL 

CURSOS DE 
PERFECCrONAMtENTO 

Normalmente, los Centres Atan 
dictan cursos li programacion, y 
ofrecen diversos seminarios, con ei 
fin de que las fafniiias que ya cjentan 
con un computador Atan, 
aprovechen al maximo las 
posibilrdades que este ofrece y se 
integren al f^scinante mundo de la 
coTTput^cidn. 




Un encuentro con la computaeion 



va 



AJirCA 
IQUIQUE 
ANTOFAGASTA 
LA SERENA 
VINA DEL MAR 
VALPARAISO 
SAN ANTONIO 
--SANTIAGO 

CURICO 



> 



Santa Maria 21! 9 TALCA 

Baquedano898 CHILLAN 

Baquedano 477 CONCEPCION 

Cordovez 499 LOS ANGELES 

San Martin 545 TEMUCO 

Blanco 113] VALDfVIA 

BarrosLUCol413 OSORNO 

Augusto Leguir! Sur 75 PUERTO MONTr 

Andres de Fuenzalid,^ 79 PUNTA ARENAS 
. PenaBOO 

CON RESPALDO COELSA COMPUTACION 



lSurl639EdificioL(rcayL7 
Edificio Salmon L 1 4 
Rengo28] 
Colon 523 
Montt730 
Independencia 555 
Eieuterio Ramirez 870 
Urmeneta 529 
Rocca886L23 




